my %hash2; $hash2{$_}++ for values %hash1;