At the end of

   How do I test whether two arrays or hashes are equal?

please mention that in fact CPAN is not needed at all,

use Data::Dumper;
$Data::Dumper::Indent = 0;
$Data::Dumper::Purity = $Data::Dumper::Useqq = $Data::Dumper::Sortkeys = 1;
printf "a and b contain %s hashes\n",
  Dumper( \%a ) eq Dumper( \%b ) ? "the same" : "different";

By the way mixing EXTRA and extra isn't best for certain sound oriented
reading public, so perhaps say FOO. However perhaps the idea is to keep
those users on their toes.