すいませんすいませんすいません。 1,1,レコードA 2, ,レコードB 3,1,レコードC 4,1,レコードDこんなファイル。2カラム目が有効フラグで、こいつが立ってる行だけ表示したかったとします。 open(my $fh, 'test.csv') or die; while(<$fh>){ tr/\r\n//d; my (…