foreach (@array[1..$#array]) {
   ...
}