免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
12
最近访问板块 发新帖
楼主: 代号:军刀
打印 上一主题 下一主题

[文本处理] awk怎样处理二次变量 [复制链接]

论坛徽章:
0
11 [报告]
发表于 2013-07-24 16:24 |只看该作者
awk 'FNR==1{for(i=1;i<=NF;i++){if($i == "key"){a[i]++}};next} {for (i in a) {printf $i","};print ""}' k


4,8,2,
5,4,1,
4,8,2,
2,0,3,

论坛徽章:
13
丑牛
日期:2013-08-16 15:08:22技术图书徽章
日期:2013-11-26 10:13:40双鱼座
日期:2013-11-08 15:03:26戌狗
日期:2013-11-08 13:52:30技术图书徽章
日期:2013-11-05 14:06:30戌狗
日期:2013-10-31 11:45:42CU十二周年纪念徽章
日期:2013-10-24 15:41:34天秤座
日期:2013-10-11 14:55:08子鼠
日期:2013-09-26 19:36:35水瓶座
日期:2013-09-26 17:44:56午马
日期:2013-08-26 10:24:23丑牛
日期:2013-08-19 14:43:22
12 [报告]
发表于 2013-07-24 17:03 |只看该作者
回复 11# Kotokz


    你那样打印的列是乱序的,下面我写个顺序打印的
  1. awk 'NR==1{for(i=1;i<=NF;i++){if($i == "key")a=a?a"\t"i:i}}{l=split(a,c);for(i=1;i<=l;i++){j=j?j"\t"$c[i]:$c[i]}print j;j=""}' k     
  2. key     key     key
  3. 2       4       8
  4. 1       5       4
  5. 2       4       8
  6. 3       2       0
复制代码

论坛徽章:
13
双鱼座
日期:2013-10-23 09:30:05数据库技术版块每日发帖之星
日期:2016-04-20 06:20:00程序设计版块每日发帖之星
日期:2016-03-09 06:20:002015亚冠之塔什干火车头
日期:2015-11-02 10:07:452015亚冠之德黑兰石油
日期:2015-08-30 10:07:07数据库技术版块每日发帖之星
日期:2015-08-28 06:20:00数据库技术版块每日发帖之星
日期:2015-08-05 06:20:002015年迎新春徽章
日期:2015-03-04 09:57:09辰龙
日期:2014-12-03 14:45:52酉鸡
日期:2014-07-23 09:46:23亥猪
日期:2014-03-13 08:46:22金牛座
日期:2014-02-11 09:36:21
13 [报告]
发表于 2013-07-24 20:05 |只看该作者
不明觉厉

论坛徽章:
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
14 [报告]
发表于 2013-07-25 10:30 |只看该作者
mark,看看高人解决。

论坛徽章:
0
15 [报告]
发表于 2013-07-25 10:51 |只看该作者
本帖最后由 spiraspera 于 2013-07-25 10:52 编辑
代号:军刀 发表于 2013-07-24 17:03
回复 11# Kotokz

请问一下,这里面的a=a怎么理解的
  1. awk 'NR==1{for(i=1;i<=NF;i++){if($i == "key")a=a?a"\t"i:i}}{l=split(a,c);for(i=1;i<=l;i++){j=j?j"\t"$c[i]:$c[i]}print j;j=""}' k
复制代码

论坛徽章:
1
技术图书徽章
日期:2013-09-25 21:06:29
16 [报告]
发表于 2013-07-25 11:03 |只看该作者
回复 2# WilliBhamlll


    为什么 awk 'BEGIN{while(getline <"file")a=$2" "$3" "$4;print a}' 只会打印出来一行呢? 我理解的 在begin中, getline会将file文件中的所有行都进行循环赋值给a,然后打印出来啊?

论坛徽章:
0
17 [报告]
发表于 2013-07-25 11:03 |只看该作者
本帖最后由 Kotokz 于 2013-07-25 11:05 编辑

a=a?a"\t"i:i

if (a != "") then {a =  a+"\t" + i} else {a = i}

论坛徽章:
2
射手座
日期:2014-10-10 15:59:4715-16赛季CBA联赛之上海
日期:2016-03-03 10:27:14
18 [报告]
发表于 2013-07-25 11:10 |只看该作者
回复 16# yuloveban


    print 在循环外面

论坛徽章:
50
15-16赛季CBA联赛之广夏
日期:2018-11-05 09:42:462015年亚冠纪念徽章
日期:2015-07-23 11:58:122015亚冠之广州富力
日期:2015-07-07 08:26:172015亚冠之塔什干棉农
日期:2015-06-29 09:08:072015年亚洲杯之伊朗
日期:2015-03-08 20:51:012015年迎新春徽章
日期:2015-03-04 09:58:11未羊
日期:2014-10-16 22:41:47处女座
日期:2014-10-16 15:33:33酉鸡
日期:2014-03-13 12:54:10巳蛇
日期:2014-03-10 14:39:052015亚冠之德黑兰石油
日期:2015-07-29 12:46:372015亚冠之德黑兰石油
日期:2015-08-07 12:54:11
19 [报告]
发表于 2013-07-25 11:11 |只看该作者
回复 16# yuloveban


    while循环里一次将file读完,然后a=$2" "$3" "$4,因此只有最一行的$2" "$3" "$4被赋值给变量a,然后打印出来。
  1. [WilliBhamlll@CC ~]$ cat file
  2. 1 1 1 1
  3. 2 2 2 2
  4. 3 3 3 3
  5. [WilliBhamlll@CC ~]$ awk 'BEGIN{while(getline <"file")a=$2" "$3" "$4;print a}' file
  6. 3 3 3
复制代码

论坛徽章:
1
技术图书徽章
日期:2013-09-25 21:06:29
20 [报告]
发表于 2013-07-25 12:41 |只看该作者
回复 19# WilliBhamlll


    哦, 明白了, 非常感谢~
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP