my $a;
if ($a) {}

##</code><code>##

my $a;
$a++;