查找输入文件匹配行输出到新文件

loongsky

想求个脚本，输入文件 infile  得到文件 infile.out
如果cell="*", 取出*，以name:*的形式加在 ;;orperties的前面一行
如果cell="*"和;;orperties之间已经有name:*则跳过
同时已经用perl解决了，但我还想用shell，麻烦各位了
perl的思路,只是形式，无语法，
while 读入文件
if $line= "cell="*""
$current=$1
if $line= "name:*"
$current=""
if $line=";;roperties"
printf (name:*)
输出infile.out


infile内容

1. cell="inv"
   
2. ;;;Properties
   
3. 
   
4. cell="nand2"
   
5. ;;;Properties
   
6. 
   
7. cell="xor"
   
8. name:xor
   
9. ;;;Properties
   
10. 
    
11. cell="nor"
    
12. ;;;Properties
    
13. 
    
14. ###还有很多。。。

复制代码

infile.out内容

1. cell="inv"
   
2. name:inv
   
3. ;;;Properties
   
4. 
   
5. cell="nand2"
   
6. name:nand2
   
7. ;;;Properties
   
8. 
   
9. cell="xor"
   
10. name:xor
    
11. ;;;Properties
    
12. 
    
13. cell="nor"
    
14. name:nor
    
15. ;;;Properties
    
16. 
    
17. ###还有很多。。。

复制代码

kk5234

1. sed '/name:/d;/cell="\([^"]*\)"/{p;s//name:\1/}' infile

复制代码

yinyuemi

回复 2# kk5234


    sed '/cell="\([^"]*\)"/{s//&\nname:\1/;n};/name:/d'

kk5234

回复 3# yinyuemi

学习！ 刚刚看错题意
   

loongsky

回复 5# zooyo


    结果是原文输出了。。

我是想加载 ;;roperties前一行

rdcwayx

1. awk -F = '/cell=/{t=$2;gsub(/"/,"",t)}
   
2.       /;;;Properties/{$0="name:" t RS $0}1' infile

复制代码

loongsky

回复 5# zooyo


    &是什么意思啊 我把 （）中的改为 .*就查不多了 但不换行

还有就是这中不能排除已经有 name的