my $iteration_number = 0;
foreach my $val ( @array ) {
   $iteration_number ++;
   print ":$iteration_number:\n";
}