文本处理问题

dashorc

原帖由 blackold 于 2009-7-1 13:35 发表
改一下啊|sed '/^[0-9]\+/s//ASN1.1,None,&,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474/'

ASN1.1,None,&,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474 这一串数字一直会变，能用变量代替吗？

blackold

如何变法？你要说清楚。

dashorc

原帖由 blackold 于 2009-7-1 16:29 发表
如何变法？你要说清楚。

我换个简单的例子：
有两个目录dir1 dir2
dir1下面的文件：
cat file1
ASN,1,123,hello
456
789

cat file2
111
222
333

cat file3
999
888
777

dir2下面的文件：
cat file1
SSS,1,SZ456,HAHA
SZ123
SZ555

cat file2
SZ789
SZ222

每个目录下面分别进行替换，也就是dir1下面生成一个文件：
ASN,1,123,hello
ASN,1,456,hello
ASN,1,789,hello
ASN,1,111,hello
ASN,1,222,hello
ASN,1,333,hello
ASN,1,999,hello
ASN,1,888,hello
ASN,1,777,hello

dir2下面生成一个文件:
SSS,1,SZ456,HAHA
SSS,1,SZ123,HAHA
SSS,1,SZ555,HAHA
SSS,1,SZ789,HAHA
SSS,1,SZ222,HAHA

[ 本帖最后由 dashorc 于 2009-7-1 16:38 编辑 ]

blackold

到每个目录下执行脚本, 比如

1. 
   
2. $ pwd
   
3. dir1
   
4. $ awk 'NR==1{r=$0;print;next}{sub(/None,[0-9]+/,"None,"$1,r);print r}' file* > newfile

复制代码

dashorc

[root@tommy dir1]# awk 'NR==1{r=$0;print;next}{sub(/None,[0-9]+/,"None,"$1,r);print r}' file1
ASN,1,123,hello
ASN,1,123,hello
ASN,1,123,hello

是我的awk版本问题吗？
[root@tommy dir1]# awk -W version
GNU Awk 3.1.3

blackold

Sorry. 脚本要修改一下：

1. awk 'NR==1{r=$0;print;next}{print gensub(/[^,]+/,$1,3,r)}' file*

复制代码