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