Select Code to Download

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

#!/usr/bin/perl
use strict;
...
{
    print "$v => $t\n";
}

4 => 4
0 => 0
0 => 0
3 => 3