This question has been asked before, several times.

Check Super Search for titles containing "compar hash" and you'll get a roomful.

I would recommend starting with this recent node.

For the impatient, here's a quick recipe (not the best one, but short nonetheless).

print "different"
if (join('/',sort keys %hash1) ne join('/',sort keys %hash2)) 
or ( join('/',sort values %hash1) ne join('/',sort values %hash2))
[download]