免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 682 | 回复: 1

求帮忙 !!!!! [复制链接]

论坛徽章:
0
发表于 2013-04-20 15:47 |显示全部楼层

A。txt
789  89  555  66
852  78  777  852
855  75  66    77
852  99  525  22
859  88  777  23
962  74  23    100
在第三列和第四列  只要是存在相同的数字 ,那么这些数字所在的行就会被留下。

即可得到B.TXT
789  89  555  66
855  75  66    77
859  88  777  23
962  74  23    100


求各位大神帮忙 谢谢!!!!!

论坛徽章:
7
戌狗
日期:2013-12-15 20:43:38技术图书徽章
日期:2014-03-05 01:33:12技术图书徽章
日期:2014-03-15 20:31:17未羊
日期:2014-03-25 23:48:20丑牛
日期:2014-04-07 22:37:44巳蛇
日期:2014-04-11 21:58:0915-16赛季CBA联赛之青岛
日期:2016-03-17 20:36:13
发表于 2013-05-14 09:58 |显示全部楼层
  1. #!/usr/bin/perl
  2. my ( %c, %d );
  3. print map { $d{ $_->[1] } || $c{ $_->[2] } ? $_->[0] : () }
  4.   map { my @s = split; $c{ $s[2] }++; $d{ $s[3] }++; [ $_, @s[ 2, 3 ] ] }
  5.   <DATA>;

  6. __DATA__
  7. 789  89  555  66
  8. 852  78  777  852
  9. 855  75  66    77
  10. 852  99  525  22
  11. 859  88  777  23
  12. 962  74  23    100
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

DTCC2020中国数据库技术大会

【架构革新 高效可控】2020年12月21日-23日第十一届中国数据库技术大会将在北京隆重召开。

大会设置2大主会场,20+技术专场,将邀请超百位行业专家,重点围绕数据架构、AI与大数据、传统企业数据库实践和国产开源数据库等内容展开分享和探讨,为广大数据领域从业人士提供一场年度盛会和交流平台。

http://dtcc.it168.com


大会官网>>
  

北京盛拓优讯信息技术有限公司. 版权所有 16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122
中国互联网协会会员  联系我们:huangweiwei@it168.com
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP