in reply to search a regex list

If your list of RE's is likely to grow, consider Regexp::Assemble.

In Section Seekers of Perl Wisdom