awk求助大神!!

丁丁咚咚

本文
SEAT () {
X (7)
Y (10)
}
SEAT () {
X (10)
Y (11)
}
轉成
SEAT 7 10(中間空一格)
SEAT 10 11

#!/usr/bin/awk -f 自动轉

{
    if ($1~/^X|Y/)
    {
      gsub(/[()]/,"")
       if ($1~/^X/) print "SEAT " ,$2;else print $2  
    }
}
爬文沒能意会OFS求助大神幫忙...
SEAT 7
10
SEAT 10
11

reyleon

爬文沒能意会你这个主题

prcardin

看不懂看不懂看不懂

yinyuemi

回复 1# 丁丁咚咚

1. echo 'SEAT () {
   
2. X (7)
   
3. Y (10)
   
4. }
   
5. SEAT () {
   
6. X (10)
   
7. Y (11)
   
8. }' |awk 'BEGIN{RS="SEAT"}match($0,/.*\(([0-9]+)\).*\(([0-9]+)\).*/,a){print RS,a[1],a[2]}'
   
9. SEAT 7 10
   
10. SEAT 10 11
    
11. 
    

复制代码

丁丁咚咚

sorry 沒表達清楚,想將本文轉成不需每次輸入指令(字母轉小寫)

seat 7 10
seat 10 11

#!/usr/bin/awk -f
{

}

初學者

reyleon大神: 他的意思可能和你之前回我的類似!!我猜的...可能一直有error message
#!/usr/bin/awk
BEGIN{ split("RTC",v,"") }
/姓名/{
    while(getline line){
        $0=$0""line;
        if(line~/\}$/)break
    }
...
}

_skytrails

1.   1 #!/usr/bin/awk -f
   
2.   2 ###########################################################
   
3.   3 #Author: skytrails
   
4.   4 #Mail: skytrails@163.com
   
5.   5 #Created Time: 2014年11月28日 星期五 01时36分07秒
   
6.   6 ###########################################################
   
7.   7
   
8.   8 {
   
9.   9     if($0~/[()]/)
   
10. 10     {
    
11. 11         gsub(/\n/,"");
    
12. 12         ORS=" ";
    
13. 13     }
    
14. 14     else
    
15. 15     {
    
16. 16         ORS="\n";
    
17. 17     }
    
18. 18     gsub(/[(){}]/,"");
    
19. 19
    
20. 20     print $0
    
21. 21 }

复制代码

bikong0411

awk -vRS='}'  '{$2=$3=$4=$6="";gsub(/[)(]/,"",$5);gsub(/[)(]/,"",$7);}$1=$1' urfile