foreach my $var (@array) {
    my $other_var = ....
    etc.
}