for my $elt (@array) {
    ...
}