批量修改文件日期长度，在线等

关阴月飞

回复 19# wang390750


    {for(i=13-split($1,a,"[0-9]");i>0;i--)$1=$1"0"}

split 用数字为分隔符拆分 $1 ， 得到的数组长度就是$1 中包含的 数字个数+1。  例如：

<dcTime>2013112823   数字的个数为 10， split 的返回值为 11

接下来再用12 - 数字个数 的值作为循环的次数， 每次循环都在原$1 后面加一个0.

Herowinter

回复 14# 关阴月飞
多谢，我的思路是当数字是1-11位时，每次循环在后面加1个0，
因为要反向引用，所以用gensub

1. awk --re-interval '{while($0~/<dcTime>([0-9]{1,11})<\/dcTime>/)$0=gensub(/<dcTime>([0-9]{1,11})<\/dcTime>/,"<dcTime>\\10</dcTime>",1);print}' i

复制代码

reyleon

1. awk 'BEGIN{RS="[0-9]+";OFS=ORS=""}{while(length(RT)<12&&length(RT)!=0)RT=RT"0"}{print $0,RT}' file

复制代码

wang390750

回复 21# 关阴月飞


    多谢。

li0924

1. awk 'BEGIN{FS=OFS="</"}{str=sprintf("%-12s",substr($1,9));gsub(/ /,'0',str);print substr($1,1,8) str,$2}' file

复制代码

kernel69

1. $ cat a
   
2. <dcTime>201311282320</dcTime>
   
3. <dcTime>2013112823</dcTime>
   
4. <dcTime>201311282310</dcTime>
   
5. <dcTime>201311282330</dcTime>
   
6. <dcTime>2013112823</dcTime>
   
7. <dcTime>201311282330</dcTime>
   
8. $ perl -pe 's/(\d+)/$1."0" x (12-length $1)/e' a
   
9. <dcTime>201311282320</dcTime>
   
10. <dcTime>201311282300</dcTime>
    
11. <dcTime>201311282310</dcTime>
    
12. <dcTime>201311282330</dcTime>
    
13. <dcTime>201311282300</dcTime>
    
14. <dcTime>201311282330</dcTime>
    
15. $

复制代码

回复 1# lw_987


   

kernel69

学习了大牛，好思路
回复 16# yestreenstars


   

klainogn

1. echo 2013112823 | awk '{a=sprintf("%-12s",$0);gsub(" ","0",a);print a}'
   
2. 201311282300

复制代码