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