用perl处理,
举个例子,
你可以准备一个hash,带2个key,
一个key (line)记录每一行的内容,一个key (count)记录该行出现的次数。
然后,把文件每一行,记录到hash里面,
记录的时侯,如果行的内容重复,则该行的次数++。
这样,当文件全部带入到hash之后,
你只需要打印出key(count)大于1的key(line)的value即可。
如何?
2012/4/25 Gary Jsz <gary.jsz@gmail.com>
我想使用perl的逻辑来处理,比如先读取文件的第一行,然后和后面几行比较,如果有相同,打印,如果没有相同的,那么读取第二行,再与后面的几行比较,以此类推,直到最后。但是,这个逻辑我不会做。在 2012年4月25日 上午10:52,Simon Xu <happyslowly@gmail.com>写道:
sort file | uniq -cd--2012/4/25 Gary Jsz <gary.jsz@gmail.com>
大家好!我有一个文本,内容如下:china abc unix https://www.linuxsir.orgAcceptEnv LANG LC_CTYPE LC_NUMERIC LC_TIME LC_COLLATE LC_MONETARY LC_MESSAGESAcceptEnv LC_PAPER LC_NAME LC_ADDRESS LC_TELEPHONE LC_MEASUREMENTAcceptEnv LC_IDENTIFICATION LC_ALL# Example of overriding settings on a per-user basis#Match User anoncvs# X11Forwarding no# AllowTcpForwarding no# ForceCommand cvs serverAcceptEnv LC_IDENTIFICATION LC_ALLchina abc unix https://www.linuxsir.org我想查找这个文本的内容是否有重复行,如果有,就打印出来,并标注有几条重复的。这个应该如何来做?--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛,请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛,请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
--
gary.jsz@gmail.com
--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛,请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
+++++++_++++++++
李 镇
DeNA China 智能手机事业部
(86-21-6267-6611-137)
大家一起来玩[梦宝谷]吧!
++++++ *-* +++++++
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛,请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
没有评论:
发表评论