my @a = (1, 2, 3);
my @b = (2, 3, 1);
my @c = (1, 2, 4);

&identical(@a, @b) returns 1
&identical(@a, @c) returns 0