if you want a loop through all the variables of an array you can do:

@array = qw( 1 2 3 4 5 6);
for $array_element ( @array ){
  print "This is the element: $array_element\n";
}
[download]

or if you want to use the index:

@array = qw( a b c d e f);
for $i ( 0 .. $#array ){
  print "This is the $i th element: ". $array[$i] ."\n";
}
[download]

Is this what you are looking for?