linux - 忽略下一个字段与上一个字段相同的行

Question

我有一个文件内容如下所示

123,1,ABC,DEF
123,1,ABC
345,4,TZY
456,3,XYZ
333,4,TTT,YYY
333,4,TTT

我想忽略前后内容相同的行，即包含 123 和 333 的行

输出需要是

345,4,TZY
456,3,XYZ

关于如何解决这个问题的任何想法

Answer 1

TMTOWTDI:

my $str = join '', <>;
$str =~ s/^(\d+).+\n(\1.+\n)+//mg;
print $str;

编辑:第一行也可以替换为 Randal L. Schwartz 的 slurp:

my $str = do { local $/; <HANDLE> }; #