my %t;
$t{$_} .= "1" for keys %hash1;
$t{$_} .= "2" for keys %hash2;