in reply to Perl program to search files

A great example of how not to write even basic programs. You code also doesn't do what you claim it does, throw in reinventing the wheel, and making it worse than established methods.