each_arrayref: argument is not an array reference
 at 557894.pl line 11
[download]

#!/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";
}
[download]

4 => 4
0 => 0
0 => 0
3 => 3
[download]

cheers,
--shmem

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}