Hello, Gunnar!
Thanmk you and sorry for delay!
Gunnar Hjalmarsson wrote:
Nicolay A. Vasiliev wrote:
I don't know anything how to download the file via perl script.
This code, which I copied from a program of mine, may get you started:
open FILE, "< $dir/$file" or die "Can't open ... $!"; binmode FILE; binmode STDOUT; print "Content-Type: application/zip\n", "Content-Disposition: attachment; filename=$file\n", 'Content-Length: ' . (stat "$dir/$file")[7] . "\n\n"; while (<FILE>) { print } close FILE;
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
