Help for this page

Select Code to Download

Select or download this

#!/usr/bin/env perl

...
print "compare: ",
      $comp->compare(\@array1, \@array2) ? "Same elements, same order\
+n"
                                         : "Different elements or diff
+erent order\n";

Select or download this

perm:    Same elements
compare: Different elements or different order