DOH! Stupid mistake. I think File::Find and grep() will do exactly what I am looking for.

I would still like other input, if anyone feels like offering their opinion.