my $r1 = [ { foo => 'baz', bar => 'qux' } ];    

##</code><code>##

my %h = ( foo => 'baz', bar => 'qux' ); 
my $r2 = [ \%h ];