Keep It Simple, Stupid | |
PerlMonks |
Re: Words in Wordsby BrowserUk (Patriarch) |
on Sep 30, 2011 at 18:57 UTC ( [id://928897]=note: print w/replies, xml ) | Need Help?? |
Try this. I project that it should complete your 410 billion comparisons in a little under 10 hours. The main attempt at efficiency here is to invoke the regex once in global mode (/g) for each word, against a single large string containing all the words and have it return all the matches. It then filters just the matching ones for your specific exclusions.
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.
In Section
Seekers of Perl Wisdom
|
|