my $file = "C:/Patch to file/FiletoSend.mp4";
my $filesize = -s $file;
print "Content-Type:video/mp4\n";
# remove comment below to make file download. Add the comment to stream data to player
#print "Content-Disposition: attachment; filename=\"FiletoSend.mp4\"\n";
print "Content-Length: $filesize\n";
print "X-Sendfile: $file";
print "\n\n";

exit;