[REBOL] Re: Faster/better way to achieve this?
From: moliad:g:mail at: 22-Apr-2009 19:29
I was going to give you the exact same code as Carl read, then saw his
suggestion :-)
so I'll complement by giving you the fastest loop to clean-up a list of
lines.
and remember to use remove-each for the handling of the lines
;-----------------------
str: [
"Romeo loves Juliet very much"
"I Don't love Romeo that much"
]
neg: [ "cheese" "bread" "wine" "very" ]
remove-each item str [not empty? intersect neg parse item none]
;-----------------------
and remember that you can use read/lines on a text file to get the data in
the str format above.
so that would make it a 3 line script :-D
-MAx
On Wed, Apr 22, 2009 at 2:23 AM, Carl Read <carl-cybercraft.co.nz> wrote: