for (my $i=0; $i <= $#array; $i++) {
 #stuff with $array[$i]
}