my $i;
foreach (@array) {
    do_something_with($item, $i++);
}