Found Botscan

#!/usr/bin/perl

use IO::Socket::INET;
use HTTP::Request;
use LWP::UserAgent;

command
!scan bug dork

Download : scans.txt