[svn:perlfaq] r9841 - perlfaq/trunk

Author: comdog
Date: Wed Aug 15 10:53:27 2007
New Revision: 9841

Modified:
   perlfaq/trunk/perlfaq6.pod

Log:
* perlfaq6: How do I efficiently match many regular expressions at once
	+ removed redundant use of \b (done once in the qr// and again in //)


Modified: perlfaq/trunk/perlfaq6.pod
==============================================================================
--- perlfaq/trunk/perlfaq6.pod	(original)
+++ perlfaq/trunk/perlfaq6.pod	Wed Aug 15 10:53:27 2007
@@ -606,7 +606,7 @@
 		{
 		foreach $pattern ( @patterns )
 			{
-			print if /\b$pattern\b/i;
+			print if /$pattern/i;
 			next LINE;
 			}
 		}