$command = join (' | grep -v ', @erase_these)
system "cat $in_file" . $command . " > $out_file"