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.