/[pcre]/code/trunk/perltest.pl
ViewVC logotype

Diff of /code/trunk/perltest.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 834 by ph10, Tue Nov 29 15:34:12 2011 UTC revision 835 by ph10, Wed Dec 28 16:10:09 2011 UTC
# Line 111  for (;;) Line 111  for (;;)
111    
112    $pattern =~ s/S(?=[a-zA-Z]*$)//g;    $pattern =~ s/S(?=[a-zA-Z]*$)//g;
113    
   # Remove /Y from a pattern (asks pcretest to disable PCRE optimization)  
   
   $pattern =~ s/Y(?=[a-zA-Z]*$)//;  
   
114    # Check that the pattern is valid    # Check that the pattern is valid
115    
116    eval "\$_ =~ ${pattern}";    eval "\$_ =~ ${pattern}";

Legend:
Removed from v.834  
changed lines
  Added in v.835

webmaster@exim.org
ViewVC Help
Powered by ViewVC 1.1.12