Select Code to Download

print $out Data::Dumper->Dump( [ \%hash ], [ '*dict' ] );

my %dict;
eval $dumped_string        # initializes %dict
  or die $@;