Re^2: read multi lines of a file in perl

while(<WORDLIST>) { next if /^process/ or /^end process/; print; }
[download]

You could consider combining the two matches into one (I would also use unless but I know that's not to everyone's taste).

while( <WORDLIST> )
{
    print unless m{^(?:end\s)?process};
}
[download]

I hope this is of interest.

Cheers,

JohnGG

Comment on Re^2: read multi lines of a file in perl Select or Download Code

Replies are listed 'Best First'.
Re^3: read multi lines of a file in perl by gwadej (Chaplain) on Nov 05, 2008 at 17:39 UTC
I probably would combine them (and use `unless`), but I was keeping it simple for early morning.<grin/> G. Wade	[reply] [d/l]