http://www.perlmonks.org?node_id=803275


in reply to REGEX or Not to REGEX for many items

I cant comment on KinoSearch, as I have never used it myself. It sounds like it is an ideal tool for what you are wanting to do. That being said, given that you are starting from the position of having a bunch of perl scripts, each having its own REGEX defined in them, it would probably be an improvement for you in the short term (at least from a manageability standpoint) to simply coalesce these scripts into a single script defining the REGEXes into an array of qr/$term/ entries, and loop over this array for each file.

@matches = (qr/term1/, qr/term2/, qr/term3/,...);

You might also find Ack useful, as you might be able to program your list of terms against an instance of an Ack object.