文本处理

423497786

文本1里面内容是
id=1000
name=jack
ip=11.11.111.11
type=wsc
one=1
two=2
port=4444
aaa=1000
....

文本2里面内容是
<web-xml>
     <conf id='1' type='int'>${ip}</conf>
     <conf id='2' type='yy'>${name}</conf>
     <conf id='3' type='int'>${aaa}</conf>
     <conf id='4' type='int'>${id}</conf>
</web-xml>
<port>$port</port>
....

实现内容：
<web-xml>
     <conf id='1' type='int'>11.11.111.11</conf>
     <conf id='2' type='yy'>jack</conf>
     <conf id='3' type='int'>1000</conf>
     <conf id='4' type='int'>1000</conf>
</web-xml>
<port>4444</port>


本人用以下awk脚本实现，我要问的问题是#后面的
awk 'BEGIN{FS="="}
NR==FNR{
  a["${"$1"}"]=$2
  next
}
{
  match($0,/\$\{[^}]+\}/)
  c=substr($0,RSTART,RLENGTH)
  sub(/\$\{[^}]+\}/,a[c],$0) #为啥用sub(c,a[c],$0)替换失败，然道sub(r, s [, t])中的r不能用变量？
}1' 1.txt 2.txt

jason680

回复 1# 423497786

would you like it

$ perl -lape 'BEGIN{%h=map{chomp;($k,$v)=split"=";$k=>$v}`cat f1`;}{s/\$\{([^}]+)\}/$h{$1}/g}' f2
<web-xml>
     <conf id='1' type='int'>11.11.111.11</conf>
     <conf id='2' type='yy'>jack</conf>
     <conf id='3' type='int'>1000</conf>
     <conf id='4' type='int'>1000</conf>
</web-xml>
<port>$port</port>

   

423497786

回复 2# jason680
大哥我说的是为啥用sub(c,a[c],$0)替换失败，不是让你换个语言写，懂不{:2_166:}


   

423497786

回复 2# jason680
而且你的<port>$port</port>也没替换掉


   

jason680

回复 4# 423497786

$ perl -lape 'BEGIN{%h=map{chomp;($k,$v)=split"=";$k=>$v}`cat f1`;}{s/\$\{?(\w+)\}?/$h{$1}/g}' f2
   

li0924

暂时纠结于port

1. lottu> awk -F"[}{]" 'NR==FNR{split($0,a,"=");b[a[1]]=a[2];next}{gsub(/\$/,"",$1);$2=b[$2]}1' 1.txt  2.txt
   
2. <web-xml>
   
3.      <conf id='1' type='int'> 11.11.111.11 </conf>
   
4.      <conf id='2' type='yy'> jack </conf>
   
5.      <conf id='3' type='int'> 1000 </conf>
   
6.      <conf id='4' type='int'> 1000 </conf>
   
7. </web-xml>
   
8. <port>port</port>

复制代码

rulebook

1. awk -F"=" 'NR==FNR{a[$1]=$2;next}NR!=1&&FNR==1{FS=OFS=">"}{for(i in a){gsub(i,a[i],$2);gsub(/[${}]/,"")};print $0}' ppp pp

复制代码

gsub里变量应该可以用。 问题应该出在${}

ly5066113

bash:

1. #! /bin/bash
   
2. 
   
3. while read line
   
4. do
   
5.         eval $line
   
6. done < file1
   
7. 
   
8. while read line
   
9. do
   
10.         eval echo \"$line\"
    
11. done < file2

复制代码

ly5066113

awk:

1. awk -F= 'NR==FNR{a[$1]=$2;next}/\$/{split($0,A,/[><{}$]+/);sub(/\${*[^<]*}*/,a[A[3]])}1' file1 file2

复制代码

423497786

回复 8# ly5066113
大哥我说的是为啥用sub(c,a[c],$0)替换失败，不是让你换成shell写，懂不