$ perl -we '%a=($bob => "foo")'
Name "main::a" used only once: possible typo at -e line 1.
Name "main::bob" used only once: possible typo at -e line 1.
Use of uninitialized value in list assignment at -e line 1.

##</code><code>##

$ perl -Mstrict -e 'my %a=($bob => "foo")'
Global symbol "$bob" requires explicit package name at -e line 1.
Execution of -e aborted due to compilation errors.