foreach my $i (0 .. $#last)

##</code><code>##

 foreach my $i (0 .. $#last)