求助用awk进行有关数字的替换

sxingbai

初学awk，本想自己摸索，却发现这里热心的高手很多，可以帮助自己少走弯路。
假设有一个文本my：
wang 12 qian 45 67 sun 22
31 tang 77 89 43 li
nan 78
我想由此新建两个文本
1.使文本中的数字都替换为它的2倍；
2.根据数字在每行出现的顺序，在其前加上相应的序号，比如`1`
即
1.
wang 24 qian 50 134 sun 44
62 tang 154 178 86 li
nan 156
2.
wang `1`12 qian `2`45 `3`67 sun `4`22
`1`31 tang `2`77`3` 89 `4`43 li
nan `1`78
请问用awk如何处理。先行感谢！

meteorcan

楼主，解释下最终两个文本的内容
第一个文件：wang 24 qian 90 .....
第二个文件：文本中的数字需要替换为2倍吗，每行第一个数字的序号都为1吗，还是说整个文件中数字的出现的次序

sxingbai

已修改提问，期待指点。

sxingbai

看来大家都睡觉了，明天再来学习。

uarenotalone

１

awk 'BEGIN{i=1;ORS=" "; }   { print i++,"\n";for(j=1;j<=NF;j++ ){ if($j~/[0-9]/){ a=$j*2;print a;}else{ print $j;}}  print "\n";       }'   test_1

就先写这一条吧，

sxingbai

回复 5# uarenotalone
多谢！
思路应该是正确的，遍历各字段看是否数字，是则乘2，否则不动。第2个道理应该相通。
但复制代码测试却提示许多语法错误，我正是初学awk，对语句语法很不清楚，希望能给出正确的写法。


   

yestreenstars

1. [root@localhost ~]# cat i
   
2. wang 12 qian 45 67 sun 22
   
3. 31 tang 77 89 43 li
   
4. nan 78
   
5. [root@localhost ~]# awk '{for(i=1;i<=NF;i++)if($i~/^[0-9]+$/)$i*=2}1' i         
   
6. wang 24 qian 90 134 sun 44
   
7. 62 tang 154 178 86 li
   
8. nan 156
   
9. [root@localhost ~]# awk '{for(i=1;i<=NF;i++)if($i~/^[0-9]+$/)$i="`"++j"`"$i;j=""}1' i
   
10. wang `1`12 qian `2`45 `3`67 sun `4`22
    
11. `1`31 tang `2`77 `3`89 `4`43 li
    
12. nan `1`78
    
13. [root@localhost ~]#

复制代码

yinwei2012

回复 1# sxingbai

1.
awk '{for(i=1;i<=NF;i++){if($i~/[0-9]+/)$i*=2;}print $0}'
2.
awk '{for(i=1;i<=NF;i++){if($i~/[0-9]+/){a++;$i="`"a"`"$i;}}a=0;print $0}'

sxingbai

回复 7# yestreenstars
十分感谢！代码如此简洁！
但我愚钝，有几处不懂，麻烦解疑：
1.语句最后的1指什么，怎么用？
2.第二个句子中的j为什么指定为空字符？
3.循环语句应该包含条件语句，后面可以不用花括号吗？


   

yestreenstars

1.http://bbs.chinaunix.net/forum.p ... mp;fromuid=26669282

2.不清空的话会影响下一行的计数，假如没有j=""，那么下一行的第一个数字就会变成`5`31，这里的j可以指定为空，也可以指定为0，目的只有一个，就是清空j的值。

3.可以，但嵌套的语句必须是单一的。