Select Code to Download

C:\>set PERL5OPT=-w -Mstrict

...
Global symbol "$x" requires explicit package name (did you forget to d
+eclare "my $x"?) at -e line 1.
Execution of -e aborted due to compilation errors.

C:\>set PERL5OPT=-w -Mstrict=refs,subs

C:\>perl -e"print $x"
Name "main::x" used only once: possible typo at -e line 1.
Use of uninitialized value $x in print at -e line 1.

C:\>perl -le "my $str = q{zxcv}; if ( $str -~ m/some pattern/i ) { pri
+nt $str; }"
Use of uninitialized value $_ in pattern match (m//) at -e line 1.
Argument "zxcv" isn't numeric in subtraction (-) at -e line 1.
zxcv