for (my $i=0; $i<=$#my_data;$i++)