正则表达式如何排除有两个连续字符的匹配?

jason680

回复 10# rdcwayx

There is a simple way to do that in Perl

# perl -lape 's/{#.*?#}/+/g' file
1. +
2. +
3. +a#}
fdss+fdjsf+dfs
fdss+fdjsf+dfs
fdss+dfs
fdss+fdjsf+dfs
fdss+fdjsf+dfs
fdss+fdjsf+dfs

   

rdcwayx

jason680 发表于 2014-03-06 08:33
回复 10# rdcwayx

There is a simple way to do that in Perl

这个问号用的很到位。没有问号，就是贪婪(greedy)匹配， 用了问号，就是懒惰(lazy)匹配或者非贪婪匹配。

Herowinter

@kaize0409@jason680@rdcwayx
如果你要一个正则实现懒惰匹配，你可以参考版主和Jason的perl代码；
如果你非要在awk中实现，你可以参考下面的代码，不过这种做法扩展
性不是很好，仅仅针对你这个问题。

1. awk '{s="";while((start=match($0,/{#/))>0){end=match($0,/#}/);if(end>start){s=s""substr($0,1,start-1)"+";$0=substr($0,end+2)}else break};print s$0}' i
   
2. 
   
3. +
   
4. +
   
5. +a#}
   
6. fdss+fdjsf+dfs
   
7. fdss+fdjsf+dfs
   
8. fdss+dfs
   
9. fdss+fdjsf+dfs
   
10. fdss+fdjsf+dfs
    
11. fdss+fdjsf+dfs
    
12. fff{#
    
13. ggg#}
    
14. hhhrrrr
    

复制代码

1. cat i
   
2. {#a#a#}
   
3. {#a}a#}
   
4. {#a#}a#}
   
5. fdss{#sdjas#}fdjsf{#dsfjs#}dfs
   
6. fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
   
7. fdss{#sdjas#fdjsf#dsfjs#}dfs
   
8. fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
   
9. fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
   
10. fdss{#sdjas#}fdjsf{#dsfjs#}dfs
    
11. fff{#
    
12. ggg#}
    
13. hhhrrrr

复制代码

rogantianwz

*? 这种忽略优先量词的用法在很多地方都不支持，但我估计perl、java、php什么的应该是支持的
因为我在LZ的另外一个帖子里，他用的是awk，我测了一下，貌似不支持*?

me09

1. #!/bin/bash
   
2. while read line
   
3. do
   
4.         echo `echo $line|tr  "^[#{}]"  "\n"|awk 'BEGIN{RS="[\n]+";ORS=" "}{print $0}'|sed 's/+$/\n/'`
   
5. done
   

复制代码

cat x.txt
1. {#a#a#}
2. {#a}a#}
3. {#a#}a#}
fdss{#sdjas#}fdjsf{#dsfjs#}dfs
fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
fdss{#sdjas#fdjsf#dsfjs#}dfs
fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
fdss{#sdjas#}fdjsf{#dsfjs#}dfs

运行：bash x.sh < x.txt
1. a a
2. a a
3. a a
fdss sdjas fdjsf dsfjs dfs
fdss sd jas fdjsf ds fjs dfs
fdss sdjas fdjsf dsfjs dfs
fdss sd jas fdjsf ds fjs dfs
fdss sd jas fdjsf ds fjs dfs
fdss sdjas fdjsf dsfjs dfs

me09

1. #!/bin/bash
   
2. while read line
   
3. do
   
4.         echo `echo $line|tr  "^[#{}]"  "\n"|awk 'BEGIN{RS="[\n]+";ORS=" "}{print $0}'|sed 's/+$/\n/'`
   
5. done
   

复制代码

cat x.txt
1. {#a#a#}
2. {#a}a#}
3. {#a#}a#}
fdss{#sdjas#}fdjsf{#dsfjs#}dfs
fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
fdss{#sdjas#fdjsf#dsfjs#}dfs
fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
fdss{#sdjas#}fdjsf{#dsfjs#}dfs

运行：bash x.sh < x.txt
1. a a
2. a a
3. a a
fdss sdjas fdjsf dsfjs dfs
fdss sd jas fdjsf ds fjs dfs
fdss sdjas fdjsf dsfjs dfs
fdss sd jas fdjsf ds fjs dfs
fdss sd jas fdjsf ds fjs dfs
fdss sdjas fdjsf dsfjs dfs

me09

1. #!/bin/bash
   
2. while read line
   
3. do
   
4.         echo `echo $line|tr  "[ #{}]"  "\n"|awk 'BEGIN{RS="[\n]+";ORS="+"}{print $0}'|sed 's/+$/\n/'`
   
5. done

复制代码

cat x.txt
1. {#a#a#}
2. {#a}a#}
3. {#a#}a#}
fdss{#sdjas#}fdjsf{#dsfjs#}dfs
fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
fdss{#sdjas#fdjsf#dsfjs#}dfs
fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
fdss{#sd#jas#}fdjsf{#ds#fjs#}dfs
fdss{#sdjas#}fdjsf{#dsfjs#}dfs
------------------------------------------------------
sh x.sh < x.txt
1.+a+a
2.+a+a
3.+a+a
fdss+sdjas+fdjsf+dsfjs+dfs
fdss+sd+jas+fdjsf+ds+fjs+dfs
fdss+sdjas+fdjsf+dsfjs+dfs
fdss+sd+jas+fdjsf+ds+fjs+dfs
fdss+sd+jas+fdjsf+ds+fjs+dfs
fdss+sdjas+fdjsf+dsfjs+dfs