perl – 哪些单行可以将第n列的唯一元素输出到另一个文件？

我有这样一个文件：

1 2 3 
4 5 6
7 6 8
9 6 3
4 4 4

哪些单行可以将第n列的唯一元素输出到另一个文件？

编辑：这是人们提供的解决方案列表.多谢你们！

cat in.txt | cut -d' ' -f 3 | sort -u
cut -c 1 t.txt | sort -u
awk '{ print $2 }' cols.txt | uniq
perl -anE 'say $F[0] unless $h{$F[0]}++' filename

解决方法

更正：谢谢Mark rushakoff.

$cut -c 1 t.txt | sort | uniq

要么

$cut -c 1 t.txt | sort -u


1
4
7
9