免费注册 查看新帖 |

Chinaunix

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

[文本处理] 一个比较复杂的awk比对问题 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2014-07-31 10:40 |只看该作者 |正序浏览
比对文本
{7106561412,50297001,6075261,571,65000326193972,4740,20140601000000,20140701000000:0,360000}
{7106561412,50297001,6075271,571,65000326193972,4740,20140601000000,20140701000000:0,360000}

{7103210808,50297001,6075271,571,65000242312608,960,20140601000000,20140701000000:0,360000}
{7103210808,50297001,6075271,571,65000242312608,960,20140601000000,20140701000000:1140,360000}

{7106561412,50297001,6075271,571,65000326193972,9000,20140601000000,20140701000000:0,360000}
{7106561412,50297001,6075271,571,65000326193972,9000,20140601000000,20140701000000:4740,360000}

{7103210808,50297001,6075271,571,65000242312608,480,20140601000000,20140701000000:1080,360000}
{7103210808,50297001,6075271,571,65000242312608,480,20140601000000,20140701000000:2220,360000}

{7103210808,50297001,6075271,571,65000242312608,120,20140601000000,20140701000000:960,360000}
{7103210808,50297001,6075271,571,65000242312608,120,20140601000000,20140701000000:2100,360000}

以空格为分界线比对相邻两行数据,每行数据以“,”为分隔符,屏蔽掉第八个域,即除了第八个域。如果两行数据不同,打印出这相邻的两行数据。文本中的数据有多条记录

求大神解答。在线等

论坛徽章:
1
处女座
日期:2014-09-18 16:18:00
15 [报告]
发表于 2014-07-31 18:38 |只看该作者
本帖最后由 Kasiotao 于 2014-07-31 18:41 编辑

回复 14# lklkxcxc
  1. gensub(r, s, h [, t])   Search  the  target string t for matches of the
  2.                                regular expression r.  If h is a string  begin‐
  3.                                ning with g or G, then replace all matches of r
  4.                                with s.  Otherwise, h is  a  number  indicating
  5.                                which  match of r to replace.
复制代码
不是前7个域,是满足正则匹配式的第7个字符串,从,到下一个,前第7个字符串刚好是LZ想忽略的以,为FS的$8,把它去掉,再比较相邻两行的字符串

论坛徽章:
1
数据库技术版块每日发帖之星
日期:2016-06-23 06:20:00
14 [报告]
发表于 2014-07-31 14:59 |只看该作者
回复 3# ly5066113
7是代表前7域吗?


   

论坛徽章:
5
金牛座
日期:2013-10-14 14:40:422015年亚洲杯之伊朗
日期:2015-03-26 10:37:012015亚冠之浦和红钻
日期:2015-10-12 17:47:4115-16赛季CBA联赛之山东
日期:2016-01-20 16:43:1215-16赛季CBA联赛之辽宁
日期:2016-03-29 16:43:59
13 [报告]
发表于 2014-07-31 14:35 |只看该作者
awk -v RS= '{a=$0}gsub(/,[^,]*:[^,]*/,"",$0){if($1!=$2)print a}' t

论坛徽章:
33
荣誉会员
日期:2011-11-23 16:44:17天秤座
日期:2014-08-26 16:18:20天秤座
日期:2014-08-29 10:12:18丑牛
日期:2014-08-29 16:06:45丑牛
日期:2014-09-03 10:28:58射手座
日期:2014-09-03 16:01:17寅虎
日期:2014-09-11 14:24:21天蝎座
日期:2014-09-17 08:33:55IT运维版块每日发帖之星
日期:2016-04-17 06:23:27操作系统版块每日发帖之星
日期:2016-04-18 06:20:00IT运维版块每日发帖之星
日期:2016-04-24 06:20:0015-16赛季CBA联赛之天津
日期:2016-05-06 12:46:59
12 [报告]
发表于 2014-07-31 13:54 |只看该作者
回复 8# yestreenstars

不是. 其实一直在学习erlang, 但它根本不适合这项工作.


要尽可能选择合适的工具, 这个合适, 不只是可以解决问题, 还包括解决问题的时间成本, 熟练程度也会影响时间成本.
后期的可维护性, 也是一个重要的考虑因素, 当然, 如果只处理一次, 那随便搞搞了.


   

论坛徽章:
145
技术图书徽章
日期:2013-10-01 15:32:13戌狗
日期:2013-10-25 13:31:35金牛座
日期:2013-11-04 16:22:07子鼠
日期:2013-11-18 18:48:57白羊座
日期:2013-11-29 10:09:11狮子座
日期:2013-12-12 09:57:42白羊座
日期:2013-12-24 16:24:46辰龙
日期:2014-01-08 15:26:12技术图书徽章
日期:2014-01-17 13:24:40巳蛇
日期:2014-02-18 14:32:59未羊
日期:2014-02-20 14:12:13白羊座
日期:2014-02-26 12:06:59
11 [报告]
发表于 2014-07-31 11:57 |只看该作者
回复 1# 殇19921011

$ awk -F, 'NF==0{n=0;next}{if(++n==1){a=$0;$8="";b=$0}else{c=$0;$8="";if(b!=$0)print a"\n"c"\n"}}' FILE
{7106561412,50297001,6075261,571,65000326193972,4740,20140601000000,20140701000000:0,360000}
{7106561412,50297001,6075271,571,65000326193972,4740,20140601000000,20140701000000:0,360000}


   

论坛徽章:
0
10 [报告]
发表于 2014-07-31 11:51 |只看该作者
我的机器不能用gensub啊 awk: Function gensub is not defined.回复 9# Kasiotao


   

论坛徽章:
1
处女座
日期:2014-09-18 16:18:00
9 [报告]
发表于 2014-07-31 11:48 |只看该作者
回复 6# 殇19921011
ly的方法很精辟。。你可以学习下。。以空行做RS,然后用gensub比较,这样也不影响原字符串,碉堡

   

论坛徽章:
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
8 [报告]
发表于 2014-07-31 11:47 |只看该作者
回复 4# q1208c

你是来宣传perl的~
   

论坛徽章:
9
寅虎
日期:2013-12-02 12:49:22巨蟹座
日期:2014-07-18 18:13:34卯兔
日期:2014-07-25 14:43:08子鼠
日期:2014-07-26 10:10:51酉鸡
日期:2014-07-31 15:09:562015亚冠之本尤德科
日期:2015-05-19 09:27:382015亚冠之卡尔希纳萨夫
日期:2015-06-20 10:30:212015亚冠之阿尔纳斯尔
日期:2015-07-01 20:46:062015亚冠之城南
日期:2015-07-15 21:12:00
7 [报告]
发表于 2014-07-31 11:46 |只看该作者
  1. awk 'BEGIN{FS=","}{a[NR]=$0;b[NR]=$1$2$3$4$5$6$7$9;if(NR%3==2 && b[NR]!=b[NR-1])print a[NR-1]"\n"a[NR]}' c.txt
复制代码
  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP