如何在awk中模拟`uniq -d`？

Question

我有一个没有的busybox系统,uniq我想生成一个独特的重复行列表.

uniq仿效的一个简单的例子awk是:

sort <filename> | awk '!($0 in a){a[$0]; print}'

我如何使用awk(或者sed就此而言perl)不能完成:

sort <filename> | uniq -d

Answer 1

在busybox系统上,您可能需要保存字节.;-)

awk ++a[\$0]==2