http://www.perlmonks.org?node_id=646323


in reply to Printing an array using while loop

A for loop can always be written like a while loop
my @array = qw{ball bat helmet}; my $i=0; while ($i<=$#array) { print $array[$i],"\n"; $i++; }