perl中foreach怎么使用

在 Perl 中，`foreach` 用于迭代数组或哈希中的每个元素。它的语法如下：
对于数组：
```perl
foreach my $element (@array) {
# 在这里操作每个元素 $element
}
```
对于哈希：
```perl
foreach my $key (keys %hash) {
my $value = $hash{$key};
# 在这里操作每个键值对 $key 和 $value
}
```
在这些示例中，`$element` 是数组中的每个元素，`$key` 是哈希中的每个键，`$value` 是哈希中对应于键的值。您可以在 `foreach` 循环中执行所需的操作。