Select Code to Download

use warnings;
use strict;
...
  print "\nin sub: " . Dumper (\%hash);
  return {%hash};
}

Original hash: $VAR1 = {
          'first' => {
...
                        '2' => 'second 2'
                      }
        };

use warnings;
use strict;
...
  my (%hash) = @_;
  return %hash;
}

Can't use string ("2/8") as a HASH ref while "strict refs" in use at C
+:\Documents and Settings\Peter.WINDOMAIN\My Documents\PerlMonks\nonam
+e.pl line 9.