perl语言求txt文件重复列数频数输出

数据如图所示，请问怎么找出重复列数并且降序输出到另外一个txt文件中列的内容和频数？数据有2000w行左右

http://bbs.chinaunix.net/thread-4184434-1-1.html

问题解决了吗？用hash列表 + sort函数可以处理这个问题