Help for this page

Select Code to Download


  1. or download this
    use Data::Dump qw[ pp ];

...
    pp $locals;
    return $fun->();
}
  2. or download this
    C:\test>1114414.pl
Name "main::bob" used only once: possible typo at C:\test\1114414.pl l
+ine 52.
{ bob => 45 }
Use of uninitialized value $bob in print at C:\test\1114414.pl line 52
+.