my $counter=0; foreach my $element (@result) { print "\nCHECKPOINT\n $result[$counter]\n"; $counter ++; } #### foreach () { my @dataset = split /blah/, $myarray[$outercounter]; for ($innercounter = 0; $innercounter < n; $innercounter++) { my $counter = $innercounter + $outercounter; my @miniarray = split /blah/, $myarray[$counter]; $sum += $miniarray[x]; } $outercounter ++; my $mavg = $sum / n; push (@resultset, "the things I need"); $sum = 0; $mavg = 0; last if $outercounter == scalar(@myarray); }