回答。

問題の歴史:

Perlはその初期の開発から配列やデータリストの操作に重点を置いてきました。map、grep、そしてforeachループ演算子は、プログラマーがコレクションを簡潔かつ効率的に処理することを可能にし、一つの式で強力な関数型プログラミングのパターンを実現します。

問題:

多くの初心者のPerlプログラマーは、mapを使用すべき場面とforeachまたはgrepを使用すべき場面を混同し、それが不適切なツールの選択につながり、パフォーマンスやコードの可読性を低下させることがあります。また、このような式の中での副作用に対する注意が不足すると、デバッグが難しいエラーを引き起こすことになります。

解決策:

データの反復方法の正しい選択は、問題に依存します：

map はリストの要素を変換し、新しい結果リストを構築するために使用されます。
grep は指定された条件に基づいて元のリストの要素をフィルタリングします。
foreach は副作用や反復処理を行うために使用され、通常は戻り値を持ちません。

コード例：

my @numbers = (1, 2, 3, 4, 5);
my @squares = map { $_ * $_ } @numbers;                # [1, 4, 9, 16, 25]
my @even = grep { $_ % 2 == 0 } @numbers;              # [2, 4]
foreach my $n (@numbers) {
    print "Number: $n
";                              # 各要素を出力
}

主な特徴：

map と grep はリストコンテキストで動作し、新しいリストを返します。
foreach は新しいリストを作成せず、単に要素を反復します。
map や grep の中での副作用は推奨されません。

陷阱のある質問。

mapやgrepの内部で配列を安全に変更できますか？

いいえ、Perlは要素のコピーのリストを通過しますが、元の配列の変更は予期しない結果をもたらす可能性があり、無限ループを引き起こすこともあります。

mapやgrepの内部でreturnを使用するとどうなりますか？

匿名ブロック内でのreturnは、map/grepの内部を出るのではなく、周囲のサブルーチンから出ることになるため、プログラムのロジックにとって危険です。

コード例：

sub example {
    my @data = (1, 2, 0, 4);
    my @result = map { return "oops" if $_ == 0; $_+1 } @data; # 0があるとexampleから出る
}

副作用のためにmapを使用することはなぜダメですか？

mapは新しいリストの生成を目的としており、その全ての要素は即座に計算されます。副作用にはforeachを使用する方が最適であり、より読みやすく結果を保持する必要がありません。

一般的な間違いやアンチパターン

副作用のためだけにmapやgrepを使用する。
mapやgrepの内部で元のデータ構造を変更する。
ブロック内でのreturnの不適切な処理。

実生活の例

ネガティブケース

プロジェクトでmapを使用してログに書き込むため、返されるリストには関心を持たなかった。

長所：

短くて「機能的な」コード。

短所：

不必要なメモリ消費。
返される値に意味がないため、理解が難しくなる。

ポジティブケース

ログの書き込みにはforeachを使用し、新しいリストの生成にはmapのみを使うことでパターンを混同しなかった。