print Data::Dumper->Dump([\%my_hash],[qw(*my_hash)]);