foreach my $index ( 0 .. $endex ){
  
  last if $index == $endex;