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