$ perl -Mstrict -e'if (my $x = 0) {} print $x,$/'
Global symbol "$x" requires explicit package name at -e line 1.
Execution of -e aborted due to compilation errors.
$