my %hash = (...);
print Data::Dumper->Dump( [\%hash], ['hash'] );