Поисковик уязвимостей, perl

Решил для своего удобства написать поисковик уязвимостей.
Поиск осуществляется по нескольким сайтам( каким - написано в загаловке скрипта)
В скрипте есть переменная, в которой содержится искомый запрос...кому надо - переделывайте на запрос из STDIN или ARGV =)

PS: Критика уместна
PPS: Секлаб так и не домучал...будет в следующей версии )
PPPS: MadNet'у - превед, опенсорс форева

Скачать