Help for this page

Select Code to Download

Select or download this

c:\@Work\Perl\monks>perl -wMstrict -MData::Dumper -le
"sub foo {
...
          '1000' => $VAR1->{'1002'},
          '1003' => $VAR1->{'1002'}
        };

Select or download this

c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
"sub foo {
...
 dd $hash_ref;
"
{ 1000 => [0], 1001 => [1], 1002 => [2], 1003 => [3], 1004 => [4] }