my %hash = map { $_  => [ $h1{$_}, $h2{$_} ] } keys %h1, keys %h2;