my %h = ( foo => 'bar', dog => 'boo' );
print Dumper \%h;

$VAR1 = {
          'dog' => 'boo',
          'foo' => 'bar'
        };