So, your saying I should POSSIBLY have something like a hash, with all my obscene names in it, then have perl just run through the hash with a foreach, and do a "contains" search?

Something like that?

Even If I did that, would not it have the same problem? if asshole =~ ass would never be true, because asshole is being searched for in the whole word ass, therefore it would never find it.

So, what do you suggest I do, to eliminate this problem?

I'm open to suggestions. Thanks for any you have :o)

thx,
Richard