Scans class C subnets quickly for hosts with telnet daemons running. By David Weekly (about 98% his code) and modified it to suit our needs. Requires perl, libnet, MD5, MIME::Base64, HTML::Parser, libwww.
You can download it from the following link: https://packetstormsecurity.com/files/download/14272/telnetdcheck.pl
Source: https://packetstormsecurity.com/files/14272/telnetdcheck.pl.html