my $v2; $v2 = -2 if 0; #### my $v2; #### my $v2 if 0;