Re^2: YAREGEX for all

Replies are listed 'Best First'.
Re^3: YAREGEX for all by chromatic (Archbishop) on Apr 22, 2008 at 20:34 UTC
Sometimes, but if these are file paths and you're doing IO, you're not going to see any time difference at all in your program. Consider using the most maintainable code in this case.	[reply]
Re^3: YAREGEX for all by runrig (Abbot) on Apr 22, 2008 at 20:35 UTC
\| and \|\| are different operators. See perlop.	[reply]
Re^4: YAREGEX for all by FunkyMonk (Bishop) on Apr 22, 2008 at 22:43 UTC
I think he meant `/abc\|def/` versus `/abc/ \|\| /def/` Unless I state otherwise, my code all runs with strict and warnings	[reply] [d/l] [select]
Re^5: YAREGEX for all by mikejones (Scribe) on Apr 24, 2008 at 20:49 UTC
correct I meant `/abc\|def/ versus /abc/ \|\| /def/` I think I will use this code. Goal is to match whats under __DATA__ and it seems to work. Comments? thank you! `use warnings; use strict; while (my $fs = <DATA>) { if ($fs =~ m{(?i)^/(?:oracle\|db\|db2\|informix\|data)(?:\s+\z\|\|\s+\w+ +\z)} ) { print "match: $fs"; } } __DATA__ junk /oracle /db /db2 /informix /data again/debo junk2 /oracle/foo /db/foo /db2/foo /informix/debo/` [download]	[reply] [d/l] [select]