文本处理问题

dashorc

cat file1
ASN1.1,None,62373488,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474
62373500
62373504



cat file2

62372069
62372109

我现在想把这两个文件合并成下面的一个文件：
ASN1.1,None,62373488,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474
ASN1.1,None,62373500,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474
ASN1.1,None,62373504,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474
ASN1.1,None,62372069,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474
ASN1.1,None,62372069,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474

以file1的第一个文件为标准，替换第三域，其他不变

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

blackold

看不明白。

moartel

cat file* |sed '/^\([0-9]\)/s/\([0-9]\)/ASN1.1,None,\1,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474/'

dashorc

谢谢，我怎么就想不到呢，哎

blackold

awk:

1. awk 'NR==1{r=$0;print;next}{sub(/None,[0-9]+/,"None,"$1,r);print r}' file1 file2

复制代码

ywlscpl

终于给看明白了

1. [root@Mylinux tmp]# awk 'NR==1{v=$0;print v}NR>1{v1=v;sub(/62373488/,$1,v1);prin
   
2. t v1}' file1 file2
   
3. ASN1.1,None,62373488,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474
   
4. ASN1.1,None,62373500,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474
   
5. ASN1.1,None,62373504,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474
   
6. ASN1.1,None,62372069,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474
   
7. ASN1.1,None,62372109,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474
   

复制代码

dashorc

cat file* |sed '/^\([0-9]\)/s/\([0-9]\)/ASN1.1,None,\1,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474/'

ASN1.1,None,6,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU001234742373500
ASN1.1,None,6,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU001234742373504
ASN1.1,None,6,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU001234742373520
ASN1.1,None,6,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU001234742373524
ASN1.1,None,6,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU001234742373527
ASN1.1,None,6,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU001234742373529

不对

blackold

改一下啊|sed '/^[0-9]\+/s//ASN1.1,None,&,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474/'

dashorc

谢谢黑哥和ywlscpl 指点，又学了不少东西

moartel

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

黑哥的简单多了

之前的少了个*
cat file* |sed '/^[0-9]/s/\([0-9]*\)/ASN1.1,None,\1,5,N2603BBOO,20090629 22:25,SZ,TX,DHL,None,AU00123474/'