for my $n ($[..$#a) {
    ...
}