# Perl - `foreach`循环

> 原文： [https://beginnersbook.com/2017/02/perl-foreach-loop-with-example/](https://beginnersbook.com/2017/02/perl-foreach-loop-with-example/)

`foreach`循环用于迭代数组/列表。

#### `foreach`循环的语法：

```perl
foreach var (list) {
   statement(s);
}
```

### `foreach`循环的执行流程

在`foreach`循环中，循环继续执行，直到处理指定数组的所有元素。

#### 例

```perl
#!/usr/local/bin/perl

@friends = ("Ajeet", "Tom", "Steve", "Lisa", "Kev");

foreach $str (@friends){
   print "$str\n";
}
```

**输出：**

```perl
Ajeet
Tom
Steve
Lisa
Kev
```