use Data::Dumper;
my %hash = (
    key1 => 'value1',
    key2 => 'value2'
);

print Dumper(%hash);  # okay, but not great
print "or\n";
print Dumper(\%hash); # much better