perl -we'$b=undef;$a{$b}=1;print$a{""}'
Use of uninitialized value in hash element at -e line 1.
1