2017-02-15 "cancelled"文字列が存在する行をスルーしてファイル読み込みする。 Perl while(<IN>){ chomp; next if($_ =~/cancelled/); #イコールとチルダを離してはダメ! print OUT $_."\n";