免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 2671 | 回复: 9
打印 上一主题 下一主题

[文本处理] shell 如何查找匹配两个关键词的文件 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2017-10-13 16:12 |只看该作者 |倒序浏览
本帖最后由 guomaoxingge 于 2017-10-13 16:15 编辑

本人菜鸟一枚。请问代码source目录下有很多.c文件,如何在这些.c文件中查找既包含“class”,又包含"extern"的文件呢?
只需要将这些文件列出来就可以了。

欢迎大神指点

论坛徽章:
307
程序设计版块每周发帖之星
日期:2016-04-08 00:41:33操作系统版块每日发帖之星
日期:2015-09-02 06:20:00每日论坛发贴之星
日期:2015-09-02 06:20:00程序设计版块每日发帖之星
日期:2015-09-04 06:20:00每日论坛发贴之星
日期:2015-09-04 06:20:00每周论坛发贴之星
日期:2015-09-06 22:22:00程序设计版块每日发帖之星
日期:2015-09-09 06:20:00程序设计版块每日发帖之星
日期:2015-09-19 06:20:00程序设计版块每日发帖之星
日期:2015-09-20 06:20:00每日论坛发贴之星
日期:2015-09-20 06:20:00程序设计版块每日发帖之星
日期:2015-09-22 06:20:00程序设计版块每日发帖之星
日期:2015-09-24 06:20:00
2 [报告]
发表于 2017-10-13 16:29 |只看该作者
  1. #!/usr/bin/perl
  2. use strict;
  3. use warnings;

  4. foreach my $f (glob('*.c')){
  5.         open(my $FHr, '<', $f);
  6.         my ($c, $e) = (0) x 2;
  7.         while(<$FHr>){
  8.                 $c = /\bclass\b/i unless($c);
  9.                 $e = /\bextern\b/i unless($e);
  10.                 $c + $e < 2 and next;
  11.                 print("$f\n"), last;
  12.         }
  13.         close($FHr);
  14. }
复制代码

论坛徽章:
24
申猴
日期:2014-10-10 15:56:39射手座
日期:2014-10-10 15:57:18黑曼巴
日期:2018-05-14 11:05:122016科比退役纪念章
日期:2018-05-14 11:05:0715-16赛季CBA联赛之北控
日期:2018-05-14 11:05:0015-16赛季CBA联赛之江苏
日期:2017-02-27 18:11:0715-16赛季CBA联赛之上海
日期:2018-08-15 09:48:5415-16赛季CBA联赛之佛山
日期:2018-07-20 17:14:2315-16赛季CBA联赛之佛山
日期:2019-09-10 18:08:4615-16赛季CBA联赛之山西
日期:2020-03-26 09:40:5115-16赛季CBA联赛之佛山
日期:2020-05-08 09:03:54
3 [报告]
发表于 2017-10-13 16:41 |只看该作者
for i in `ls source/*.c`; do (grep class $i && grep extern $i) > /dev/null 2>&1 && echo $i;done

评分

参与人数 1信誉积分 +5 收起 理由
guomaoxingge + 5

查看全部评分

论坛徽章:
0
4 [报告]
发表于 2017-10-13 17:12 |只看该作者
本帖最后由 guomaoxingge 于 2017-10-13 17:14 编辑

回复 2# sunzhiguolu

谢谢大神,这个perl没用过,但是很感谢你。只有一分了,对不起

论坛徽章:
0
5 [报告]
发表于 2017-10-13 17:13 |只看该作者
回复 3# chengchow

谢谢,这个我测试了是可以的。真厉害

论坛徽章:
0
6 [报告]
发表于 2017-10-16 11:52 |只看该作者
提示: 作者被禁止或删除 内容自动屏蔽

论坛徽章:
39
辰龙
日期:2013-08-21 15:45:192015亚冠之广州富力
日期:2015-05-12 16:34:52亥猪
日期:2015-03-03 17:22:00申猴
日期:2015-03-03 17:21:37未羊
日期:2014-10-10 13:45:41戌狗
日期:2014-06-17 09:53:29巨蟹座
日期:2014-06-12 23:17:17双鱼座
日期:2014-06-10 12:42:44寅虎
日期:2014-06-09 12:52:172015亚冠之卡尔希纳萨夫
日期:2015-05-24 15:24:35黄金圣斗士
日期:2015-12-02 17:25:0815-16赛季CBA联赛之吉林
日期:2017-06-24 16:43:52
7 [报告]
发表于 2017-10-16 14:23 |只看该作者
回复 1# guomaoxingge

  1. grep  -Pl  'class.*extern|extern.*class'   /source/*.c
复制代码

论坛徽章:
25
程序设计版块每日发帖之星
日期:2016-05-03 06:20:0015-16赛季CBA联赛之八一
日期:2018-07-05 10:34:09黑曼巴
日期:2018-07-06 15:19:5015-16赛季CBA联赛之佛山
日期:2018-08-03 13:19:3315-16赛季CBA联赛之山西
日期:2018-08-07 19:46:2315-16赛季CBA联赛之广夏
日期:2018-08-08 19:31:5015-16赛季CBA联赛之青岛
日期:2018-11-26 15:21:5015-16赛季CBA联赛之上海
日期:2018-12-11 09:45:3219周年集字徽章-年
日期:2020-04-18 23:54:5215-16赛季CBA联赛之深圳
日期:2020-04-19 21:40:19黑曼巴
日期:2022-04-03 17:55:1315-16赛季CBA联赛之八一
日期:2018-07-03 16:56:46
8 [报告]
发表于 2017-10-16 15:45 |只看该作者
回复 1# guomaoxingge


cat 1.c
class
extern
c
d

cat 2.c
class
extern
c
d

cat 3.c
class

cat 4.c
extern
  1. awk '/class/{a[FILENAME]++}/extern/{b[FILENAME]++}END{for(i in a){if(a[i]&&b[i]){print i}}}' *.c
复制代码

输出:
1.c
2.c

论坛徽章:
3
程序设计版块每日发帖之星
日期:2016-02-23 06:20:0015-16赛季CBA联赛之八一
日期:2017-10-26 17:58:2515-16赛季CBA联赛之北控
日期:2017-11-02 10:50:56
9 [报告]
发表于 2017-10-16 16:30 |只看该作者
grep "class" source/*.c | grep "extern"

论坛徽章:
0
10 [报告]
发表于 2017-10-16 18:15 |只看该作者
提示: 作者被禁止或删除 内容自动屏蔽
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP