for my $i ($m..$#a)