my %hash1 =qw/ One 1 Two 2 Three 3/;
my %hash2 =qw/ Four 4 Five 5 Six 6/;

%hash1 ,= %hash2;

say keys %hash1;