use strict;
use warnings;
use Data::Dumper

my %hash = (a=>1)
print "hash: " . Dumper( {%hash} ); # not Dumper(%hash)