use strict;
use warnings;

use Test::More tests => 2;

my @array1 = qw(1 2 3 4 5);
my @array2 = qw(1 2 3 4 5);
my @array3 = qw(1 2 4 3 5);

is_deeply(\@array1,\@array2);
is_deeply(\@array1,\@array3);