Полезная штука, я тут уже выкладывал на основе гугль движка (это тоже в гугле ищет, скорее всего)
Поиск по Perl ресурсам (всего 72) http://www.google.com/coop/cse?cx=008709583689349882482%3Aw2_rnxeqmu0

PS: ИМХО true Perl поиск, это когда в строке запроса можно писать регулярками =)
------------------

#!/usr/bin/perl
print("подпись!!1\n");