Perhaps Lingua::En::MatchNames (or one of its dependencies) is what you want?
In reply to Re: Non-exclusive or in regexp? by sintadil in thread Non-exclusive or in regexp? by cormanaz