在文本文件中，如何刪除緊隨其后的行的所有行子集？

Question

在文本文件中，我需要刪除與下一行完全相同的行。 請參閱下面的示例。

輸入：

I like
I like apples
I like apples and oranges
more
more everyday
more everyday
more everyday the more
more everyday the more I play
I
I like

輸出：

I like apples and oranges
more everyday the more I play
I like

Answer 1

單程：

$ perl -lne 'print $last unless /^\Q$last/; $last = $_;
             END { print $last }' input.txt
I like apples and oranges
more everyday the more I play
I like

Answer 2

這個sed過濾器讀取下一行並刪除前一行，只要它匹配：

sed ':0;N;s/^\(.*\)\n\1/\1/;t0;P;D'