Select Code to Download

#!/usr/bin/perl

...
print Dumper( \%HOfR );

sub Sub { };

$VAR1 = {
          'ARRAY(0x2ddf0)' => 'valForRefOfArr',
...
          'HASH(0x2ddcc)' => 'valForRefOfHash',
          'CODE(0x456cc)' => 'valForRefOfSub'
        };