for my $i ( 0 .. $#FruitAoA )