foreach my $var (@somearray) {
    ....
}