Sending files with XSendFile

rpnoble419 has asked for the wisdom of the Perl Monks concerning the following question:

Has anyone tried out the Apache module for XSendFile with Perl? I installed it and it seams to be working (Apache started). I have tried a few attempts using the following Perl code to download a file:

print "X-Sendfile: C:\\Path\\to\\file\\video\\";
print "Content-Type:application/octet-stream; name=\"File-12.mp4\"\r\n
+";
print "Content-Disposition: attachment; filename=\"File-12.mp4\"\r\n\n
+";
print "\n\n";
exit;
[download]

I'm not getting the video to download. In Chrome, I not getting the correct header, and Apache is giving me a 404 error when I run the script. I'm trying to serve large video files after the user passes muster in my app. Here is the sample PHP code I based my Perl script on.

<?php
...
if ($user->isLoggedIn())
{
    header("X-Sendfile: $path_to_somefile");
    header("Content-Type: application/octet-stream");
    header("Content-Disposition: attachment; filename=\"$somefile\"");
    exit;
}
?>
<h1>Permission denied</h1>
<p>Login first!</p>
[download]

I tried to serve the file via Perl but the file is over 1.7GB and it hangs my server with an out of memory error.

Update: Sorry where are my manners. As always, Thank You for your time and help...

Update with Solution: I had two things wrong. The first was my Apache Config. The config must look like this in-order to work:

httpd.conf

# enable xsendfile
XSendFile On
XSendFilePath C:/Path/To/Files/
[download]

The actual XsendFile On can be located in a vhost block as well, but the XSendFilePath must be located in the httpd.conf file.

My Perl header was in the wrong order. It needs to look like this:

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 strea
+m data to player
#print "Content-Disposition: attachment; filename=\"FiletoSend.mp4\"\n
+";
print "Content-Length: $filesize\n";
print "X-Sendfile: $file";
print "\n\n";

exit;
[download]

Now my system can stream the video after the user has been authenticated and I can create a one-time use URL.

Comment on Sending files with XSendFile Select or Download Code

Replies are listed 'Best First'.
Re: Sending files with XSendFile by zentara (Archbishop) on Oct 22, 2012 at 10:23 UTC
Looking at the modules's usage page maybe you need to use an .htaccess entry, or some other configuration issue? I'm not really a human, but I play one on earth. Old Perl Programmer Haiku ................... flash japh	[reply]
Re: Sending files with XSendFile by daxim (Curate) on Oct 22, 2012 at 14:35 UTC
Works for me. Show your configuration and real code. Describe in such detail that it is possible to reproduce the problem.	[reply]
Re^2: Sending files with XSendFile by rpnoble419 (Pilgrim) on Oct 22, 2012 at 14:54 UTC
If its working for you, then my Apache config may not be working.	[reply]
Re: Sending files with XSendFile by Anonymous Monk on Oct 22, 2012 at 09:04 UTC
Why do you sometimes print \r\n at the end, but sometimes you dont?	[reply]


Just another Perl shrine
	PerlMonks