Regexp::Common::Profanity

你在Google Code Search里可以搜到各种各样的牢骚、粗口或者脏话。

然后你会发现CPAN上居然也有。不过仔细一看，其中有一个模块名正言顺的收录了许多脏话。它就是Regexp::Common::Profanity。

这个包是专门用来检测文字、名字、邮箱地址中不雅的和冒犯的词句的。作者为过滤各种外国脏字煞费苦心，不但要考虑空格，还有模糊的读音、拼写以及类似ASCIIART的替换。不知道包括不包括“口禾言皆”之类的情况。