C:\test>1114414.pl
Name "main::bob" used only once: possible typo at C:\test\1114414.pl line 52.
{ bob => 45 }
Use of uninitialized value $bob in print at C:\test\1114414.pl line 52.