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