$ perl -se 'print $foo' -foo=bar  
Unrecognized switch: -foo=bar  (-h will show valid options).