c:\@Work\Perl\monks>perl -wMstrict -le
"my $x = 999;
 print 'is it safe?' if (my $x = 1);
 print $x;
"
"my" variable $x masks earlier declaration in same scope at -e line 1.
Found = in conditional, should be == at -e line 1.
is it safe?
1