Here are some ideas:

• sort keys
• Test::More::is_deeply
• Data::Compare
• perldoc -q hash
• Super Search where title contains all of "compare", "hash" ?node_id=3989;HIT=compare%20hash;re=N