Help for this page
print Dumper %hash;
print Dumper \%hash; # ^
my %copied_hash = %{ eval $string };