> perl
%h1=(a=>1,b=>2);
%h2=(a=>11,c=>3);
print (%h3=(%h1,%h2),"\n");
 
print %h3;
 
__END__
b2b2c3
c3a11b2