|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Andy Bogdanov 2:5020/400 10 Apr 2001 13:48:55 To : All Subject : Re: как оправить пользователю файл? -------------------------------------------------------------------------------- Denis Baluev <Denis.Baluev@p28.f76.n5000.z2.fidonet.org> wrote: DB> Как закачать файл на сервер - ясно. Как сделать обратную операцию? LWP, DB> насколько я понимаю, тут не подходит - ведь тогда скрипт скачивает файл DB> туда, где исполняется. А нужно отправить файл пользователю. Пример бы... DB> Спасибо. open(TXT,"<$work_file") || die "Can't open $work_file: $!\n"; print "Content-type: application/octet-stream\n", "Content-Disposition: attachment; filename=\"$filename\"\n\n"; while(<TXT>) { print $_; } close(TXT) || die "Can't close $work_file: $!\n"; или тебе его по почте запулить надо? :) -- Bye! Andy Bogdanov //andy@andy.it.itn.ru// --- ifmail v.2.15dev5 * Origin: ITN (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/24004f3d4d892.html, оценка из 5, голосов 10
|