Help for this page

Select Code to Download

Select or download this

use Modern::Perl;
use Array::Compare;
...
sub ArraysIdentical {
    Array::Compare->new()->perm( $_[0], $_[1] ) || 0;
}

Select or download this
```
The arrays are identical.
```