for my $i (reverse 0..$#a)