c:\test>perl -wE"my $a, $b or die;"
Name "main::b" used only once: possible typo at -e line 1.
Died at -e line 1.