Also check out the Regex::PreSuf module which can build a regex from a word list, not necessarily a list of regexes.