2番目の列が単語リストにある場合、CSVファイルから行を削除する

2つのステップ：

1. 削除スクリプト（AUX）の生成print unless m!gmail.com!hotmail.com|...!（正規表現は大きいが問題ありません）
2. それを適用するAll.txt

パスワード：

perl -n0E 's/\n/|/g; say "print unless m!\\b($_ç)\\b!\n" ' remove.txt > AUX
perl -n AUX    All.txt > outfile

アップデート1：大文字と小文字を区別しないようにするには、i以下を追加します。

perl -n0E 's/\n/|/g; say "print unless m!@($_=)\\b!i\n" ' remove.txt > AUX

アップデート 2 には追加の削除フィールドがあります。例外リスト（extra.txt）を含む新しいファイルを作成し、次の操作を行います。

cat remove.txt extra.txt | 
  perl -n0E 's/\n/|/g; say "print unless m!@($_=)\\b!i\n" ' > AUX
perl -n AUX   All.txt > outfile