求助：正则表达式 有没有和关系？

miocn

求助各位老大：
          如何通过一个表达式判断字符串包括 几个字符？
          例如以下文本
          you and me
          he and me
          me and he
          判断条件是文本中包括  me 和 he两个字符
         结果：
         he and me
         me and he
-------------------------------
请问这个表达式如何写，谢谢

miocn

自己
顶一下

黑色阳光_cu

1. #!/bin/env perl
   
2. 
   
3. use strict;
   
4. use warnings;
   
5. 
   
6. while (<DATA>)
   
7. {
   
8.     if (/\b(he|me)\b.*?(?!\1)\b(?:he|me)\b/)
   
9.     {
   
10.         print;
    
11.     }
    
12. }
    
13. 
    
14. __DATA__
    
15. you and me
    
16. he and me
    
17. he and he
    
18. me and me
    
19. me and he
    

复制代码

miocn

谢谢 三楼。

miocn

三楼的兄弟 ，可能我问的不对，所以答案也准确，我要做的判断是：
一句话中是否既包括“ 单词一” 又包括 “单词2” 又包括“单词3” ，如果包括三个全部单词 则返回真，否则为假。
例如： 检索词为 “this” “pen”
this  is  a pen --  true
this is  a dog --- false
pen is this   -- true

继续请各位 指点

黑色阳光_cu

三楼的兄弟 ，可能我问的不对，所以答案也准确，我要做的判断是：
一句话中是否既包括“ 单词一” 又包括 ...
miocn 发表于 2010-06-15 08:42

1. #!/bin/env perl
   
2. 
   
3. use strict;
   
4. use warnings;
   
5. use 5.010;
   
6. 
   
7. while (<DATA>)
   
8. {
   
9.         if (/\b(this|is|pen)\b.*?\b(?!\1)((?1))\b.*?\b(?!\1|\2)(?1)\b/)
   
10.         {
    
11.                 print;
    
12.         }
    
13. }
    
14. 
    
15. __DATA__
    
16. this  is  a pen --  true
    
17. this is  a dog --- false
    
18. pen is this   -- true
    
19. this is
    
20. is pen
    
21. this this this
    
22. this is this
    
23. this is is
    
24. is pen pen
    
25. is is pen
    
26. pen is this
    

复制代码

guap514

1. sub match {
   
2.     my $str = shift;
   
3.     foreach ( @_ ) {
   
4.         return "false" if $str !~ /($_)/;
   
5.     }
   
6.     return "true";
   
7. }
   
8. 
   
9. while( <DATA> ) {
   
10.     print match( $_, "this", "pen" ), "\t$_";
    
11. }
    
12. 
    
13. __DATA__
    
14. this  is  a pen --  true
    
15. this is  a dog --- false
    
16. pen is this   -- true

复制代码

必须要一句话匹配出结果么？

miocn

谢谢 6楼 7楼，  7楼的兄弟正解，但是我需要一句话匹配出结果。 在pyqt中过滤使用。

黑色阳光_cu

谢谢 6楼 7楼，  7楼的兄弟正解，但是我需要一句话匹配出结果。 在pyqt中过滤使用。
miocn 发表于 2010-06-15 10:29

   


俺的结果不对?

maklive

三楼的兄弟 ，可能我问的不对，所以答案也准确，我要做的判断是：
一句话中是否既包括“ 单词一” 又包括 ...
miocn 发表于 2010-06-15 08:42

试试这个

1. #!/usr/bin/perl
   
2. 
   
3. use strict;
   
4. use warnings;
   
5. 
   
6. while (<DATA>)
   
7. {
   
8.         /\bthis\b/ and /\bis\b/ and /\bpen\b/ and print;
   
9. }
   
10. 
    
11. __DATA__
    
12. this  is  a pen --  true
    
13. this is  a dog --- false
    
14. pen is this   -- true
    
15. this is
    
16. is pen
    
17. this this this
    
18. this is this
    
19. this is is
    
20. is pen pen
    
21. is is pen
    
22. pen is this

复制代码