请教!AWK [复制链接]

论坛徽章:: 0

电梯直达

1楼 [收藏(0)] [报告]

发表于 2003-02-13 11:02 |只看该作者 |倒序浏览

如何将文本000.txt 转换成222.txt

000.txt [

   1234555538|123.36|364.25|王冠
5444667890|123.36|364.25|王冠
155123890|123.36|364.25|王冠
1234567890|123.36|364.25|王冠
1234571024|123.36|364.25|李先
5694567890|123.36|364.25|李先
9875321122|123.36|364.25|李先 ]

222.txt [
   1234555538|123.36|364.25|王冠
5444667890|123.36|364.25|王冠
155123890|123.36|364.25|王冠
1234567890|123.36|364.25|王冠
      小计：493.44|1457.00
   1234571024|123.36|364.25|李先
5694567890|123.36|364.25|李先
9875321122|123.36|364.25|李先
         小计：|370.08|1092.75 ]

文库|博客

didikei

白手起家

论坛徽章:: 0

2楼 [报告]

发表于 2003-02-13 12:24 |只看该作者

请教!AWK

BEGIN { FS="|";  getline; print $0; for ( i=2; i<=NF; i++ ) t=$i; }
      {
      if ( $NF != t[NF] ) {
            printf "小计: %.2f|%.2f|%s\n",t[2],t[3],t[4];
            for ( i=2; i<NF; i++ ) t=0;
      }
      print $0;
      t[NF]=$NF; for ( i=2; i<NF; i++ ) t+=$i;
      }
END { printf "小计: %.2f|%.2f|%s\n",t[2],t[3],t[4]; }

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

lj0388

白手起家

论坛徽章:: 0

3楼 [报告]

发表于 2003-02-13 12:46 |只看该作者

请教!AWK

非常感激！谢谢!!!

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

返回列表

Chinaunix › 论坛 › 程序设计 › Shell › 请教!AWK