avoid `my $foo = 1 if $thing`

[dakkar]

See https://metacpan.org/dist/perl/view/pod/perldeprecation.pod#Using-my()-in-false-conditional.

Fixes #266 and probably a few more hidden bugs.