A Perl search engine