http://qs321.pair.com?node_id=267881


in reply to grepping arrays

You might also want to take a look at Regexp::Common::profanity.

In Section Seekers of Perl Wisdom