Counting the number of times a value appears in your hash doesn't have to be more complicated than this:

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

— Arien