downloading an mp3 file through a Perl script


go ahead... be a heretic
	PerlMonks

downloading an mp3 file through a Perl script

by keiusui (Monk)

on Feb 09, 2006 at 19:31 UTC ( [id://529168]=perlquestion: print w/replies, xml )

Need Help??

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

I want people to be able to download an mp3 file without knowing the actual location of the mp3 file. Therefore I have written the following script which works perfectly in Internet Explorer:

print "Content-type: audio/mp3\n";
print "Content-Disposition: attachment; filename=mypersonalrecording.m
+p3\n\n";

open SONG, "/location/to/mypersonalrecording.mp3";
while(read SONG, $download, 16384, 0){print $download;}
close SONG;
[download]

Would it be better to write print "Content-type: application/x-download\n"; in the header instead?

Comment on downloading an mp3 file through a Perl script Select or Download Code

Replies are listed 'Best First'.

Re: downloading an mp3 file through a Perl script
by vladb (Vicar) on Feb 09, 2006 at 19:42 UTC

Content-type: audio/mp3

Update: didn't realize you half answered your own question there, heh!

_____________________
"We've all heard that a million monkeys banging on a million typewriters will eventually reproduce
the entire works of Shakespeare. Now, thanks to the Internet, we know this is not true."

Robert Wilensky, University of California

[reply]

Back to Seekers of Perl Wisdom