Hi all,
Given a wordlist @WordList and a file $content, how do I construct a
regexp to search for every word in @WordList in $content.
I have tried the following, which does not work:
foreach $i (@WordList)
{
print "Searching: " . $i . "\n\n";
if($content =~ m/$i/)
{
print "Found Word " . $i . "\n";
}
}
@WordList might contain up to 1000 or 2000 words, and changes daily,
so I don't think regexp::list is the answer.
Thank you for your time.
Jim
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
