Re: multiple OR match fails

in reply to multiple OR match fails

Would have been nice to include at least some piece of your input file. Your regex looks like it is missing some parentheses or something. Also, if your code is so short you might consider one-lining it:

~linux> perl -ne 'if(m/((FINDINGS|COMPLICATIONS):(.*?)([A-Z]+))/sgm){p
+rint qq|$2$3\t$4\n|};' foo7.txt
[download]

Celebrate Intellectual Diversity

Comment on Re: multiple OR match fails Download Code

Replies are listed 'Best First'.
Re^2: multiple OR match fails by ikegami (Patriarch) on Jan 31, 2012 at 06:16 UTC
`if (//g)` should be `while (//g)`.	[reply] [d/l] [select]

In Section Seekers of Perl Wisdom