|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : PROext 2:5020/400 10 Oct 2001 09:31:59
To : Alexey
Subject : Re: Скрипт скачивания
--------------------------------------------------------------------------------
> Как написать скрипт чтобы при его вызове он заставлял броузер скачивать
> определённый файл (т. е., напрмер при вызове
> "/cgi-bin/download.cgi?/docums/qqq.doc" броузер начинал скачивать файл
> /docums/qqq.doc)? Имхо тут что-то завязано с ContentType, а вот что?
open(FILE,$path.$myfile);
print "Content-type: application/octet-stream\n";
print "Content-Length: ".(-s FILE)."\n";
print "Content-Disposition: attachment; filename=$myfile\n\n";
while (read(FILE, $file, 1024000)) { print $file };
close FILE;
PS: Если под Виндами, нужно еще вставить binmode
---
Best regards, InSAn
http://www.PROext.com
--- ifmail v.2.15dev5
* Origin: MTU-Intel ISP (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: Скрипт скачивания 
