each_arrayref: argument is not an array reference at 557894.pl line 11 #### #!/usr/bin/perl use strict; use warnings; require List::MoreUtils; # use List::MoreUtils (); my @v1 = qw(4 0 0 3); my @v2 = qw(4 0 0 3); my $ea = List::MoreUtils::each_array(\@v1, \@v2); while (my ($v, $t) = $ea->()) { print "$v => $t\n"; } #### 4 => 4 0 => 0 0 => 0 3 => 3