在 Perl 中，foreach 用于迭代數組或哈希中的每個元素。它的語法如下：
對于數組：
foreach my $element (@array) {
# 在這里操作每個元素 $element
}
對于哈希：
foreach my $key (keys %hash) {
my $value = $hash{$key};
# 在這里操作每個鍵值對 $key 和 $value
}
在這些示例中，$element 是數組中的每個元素，$key 是哈希中的每個鍵，$value 是哈希中對應于鍵的值。您可以在 foreach 循環中執行所需的操作。
