awk中的值如何傳給sed

danbaoyu

現(xiàn)有文件1.txt
aaa1223
bbb12234
cccc4666
ddd12233

2.txt
aaa
bbb
xxxx
ccccc
現(xiàn)要求刪除1.txt中含有2.txt的內(nèi)容：
awk 'NR==FNR{a[i++]=$0}NR>FRN{for(q=1;q<i;q++) if($0~a[q]) print $0|"sed 's/a[q]//g'"}' 2.txt 1.txt
為什么不成功？？？

moperyblue

1. grep -vFf 2.txt 1.txt  
   
2. cccc4666
   
3. ddd12233

復(fù)制代碼

?

danbaoyu

我想要的結(jié)果是：
1223
12234
4666
ddd12233

   

Herowinter

回復(fù) 3# danbaoyu

你確定第三行4666？
1.txt 第三行4個(gè)c   2.txt 5個(gè)c

   

Herowinter

回復(fù) 1# danbaoyu

1. 
   
2. awk 'NR==FNR{a[$0];next} {for(i in a)if(gsub(i,"",$0)>0)break;print}' 2.txt 1.txt
   
3. 1223
   
4. 12234
   
5. cccc4666
   
6. ddd12233
   

復(fù)制代碼

moperyblue

回復(fù) 3# danbaoyu

1. sed -r '1{x;s/.*/cat 2.txt/e;x};G;s/([^\n]*)\n(.*)/\n\2\n\1/;s/.*(\n[^\n]*\b).*\1//' 1.txt
   
2. 1223
   
3. 12234
   
4. cccc4666
   
5. ddd12233

復(fù)制代碼

?

1. sed -r '1{x;s/.*/cat 2.txt/e;x};G;s/([^\n]*)\n(.*)/\n\2\n\1/;s/.*(\n[^\n]*).*\1//' 1.txt   
   
2. 1223
   
3. 12234
   
4. 4666
   
5. ddd12233

復(fù)制代碼

?

sunzhiguolu

1. perl -nle 'if(@ARGV){$h{$_}=1;next}if(/(\D+)(\d+)/&&$h{$1}){print $2;next}print' b a

復(fù)制代碼

1223
12234
cccc4666
ddd12233

ll104567

awk 'NR==FNR{a[$1]=$1;next}NR!=FNR{for(i in a){if($1 ~ a[i])gsub(a[i],"")}}1'  2.txt  1.txt

hz_oracle

awk 'NR==FNR{a[$1]=$1}NR>FNR{for(i in a)gsub(a[i],"",$0);print $0}' 2.txt 1.txt