免费注册 查看新帖 |

Chinaunix

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

[数值计算] 文件内容比较 [复制链接]

论坛徽章:
0
发表于 2012-11-14 11:10 |显示全部楼层
例如有两个文件A.txt 和 B.txt ,现在我希望通过shell来判断文件A中的内容是否在文件B中也出现,具体点如下:
文件A.txt 中内容
a001
a002
b003
文件B.txt中内容
a001
a002
b003
c004
d005
希望能通过脚本实现判断A.txt中的内容是否出现在B.txt文件中
如果A.txt中的内容B中也有,则统计一共有多少个是相同的

论坛徽章:
93
2015年辞旧岁徽章
日期:2019-10-10 10:51:15CU大牛徽章
日期:2014-02-21 14:21:56CU十二周年纪念徽章
日期:2020-10-15 16:55:55CU大牛徽章
日期:2014-02-21 14:22:07羊年新春福章
日期:2019-10-10 10:51:39CU大牛徽章
日期:2019-10-10 10:55:38季节之章:春
日期:2020-10-15 16:57:40ChinaUnix元老
日期:2019-10-10 10:54:42季节之章:冬
日期:2019-10-10 10:57:17CU大牛徽章
日期:2014-02-21 14:22:52CU大牛徽章
日期:2014-03-13 10:40:30CU大牛徽章
日期:2014-02-21 14:23:15
发表于 2012-11-14 11:15 |显示全部楼层
  1. [seesea2517@UC ~] #grep -cfA.txt B.txt
  2. 3

  3. [seesea2517@UC ~] #grep -fA.txt B.txt
  4. a001
  5. a002
  6. b003
复制代码

论坛徽章:
93
2015年辞旧岁徽章
日期:2019-10-10 10:51:15CU大牛徽章
日期:2014-02-21 14:21:56CU十二周年纪念徽章
日期:2020-10-15 16:55:55CU大牛徽章
日期:2014-02-21 14:22:07羊年新春福章
日期:2019-10-10 10:51:39CU大牛徽章
日期:2019-10-10 10:55:38季节之章:春
日期:2020-10-15 16:57:40ChinaUnix元老
日期:2019-10-10 10:54:42季节之章:冬
日期:2019-10-10 10:57:17CU大牛徽章
日期:2014-02-21 14:22:52CU大牛徽章
日期:2014-03-13 10:40:30CU大牛徽章
日期:2014-02-21 14:23:15
发表于 2012-11-14 11:17 |显示全部楼层
这个问题是不应该问上来的,有位老师姓搜名索,有位GG叫谷哥,有位MM叫度娘,有位可靠的男人名叫 man,有位咨询家名叫 info。

论坛徽章:
0
发表于 2012-11-14 11:39 |显示全部楼层
yinjingolay 发表于 2012-11-14 11:10
例如有两个文件A.txt 和 B.txt ,现在我希望通过shell来判断文件A中的内容是否在文件B中也出现,具体点如下: ...

贴个perl,
#!/usr/bin/perl
use strict;
use warnings;
use Data:umper;

my %hash;
open my $fhb, "<", "B.txt" or die $!;
while (<$fhb> {
        chomp;
        $hash{$_}++;
}
close $fhb;

open my $fha, "<", "A.txt" or die $!;
while (<$fha> {
        chomp;
        $hash{$_}++ if exists $hash{$_};
}
close $fha;
print Dumper(%hash);

论坛徽章:
32
处女座
日期:2013-11-20 23:41:20双子座
日期:2014-06-11 17:20:43戌狗
日期:2014-06-16 11:05:00处女座
日期:2014-07-22 17:30:47狮子座
日期:2014-07-28 15:38:17金牛座
日期:2014-08-05 16:34:01亥猪
日期:2014-08-18 13:34:25白羊座
日期:2014-09-02 15:03:55金牛座
日期:2014-11-10 10:23:58处女座
日期:2014-12-02 09:17:52程序设计版块每日发帖之星
日期:2015-06-16 22:20:002015亚冠之塔什干火车头
日期:2015-06-20 23:28:22
发表于 2012-11-14 12:09 |显示全部楼层
回复 4# cuteorange


    一个用shell简单几句就能处理的文件,用perl处理起来居然这么复杂

论坛徽章:
0
发表于 2012-11-14 13:09 |显示全部楼层
seesea2517 发表于 2012-11-14 11:17
这个问题是不应该问上来的,有位老师姓搜名索,有位GG叫谷哥,有位MM叫度娘,有位可靠的男人名叫 man,有位 ...



经典

论坛徽章:
0
发表于 2012-11-14 13:44 |显示全部楼层
能用shell简单点嘛
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP