|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Dmitry Kuzmin 2:5020/400 04 Feb 2005 01:35:56 To : Evgeni Kubachev Subject : Re: upload -------------------------------------------------------------------------------- Evgeni Kubachev пишет: > Отправляю через форму имя файла, который необходимо закачать на сервер в > папку upload. СGI-скрипт получает имя файла. Как реализовать закачку этого > файла в нужную папку на сервере? Показалбы код как ты это делаешь... ;) Можно ревлизовать следующим образом: форма - <form action="/cgi-bin/upload.cgi" method="post" enctype="multipart/form-data" name="Uploader" id="ImageUploader"> <input name="file" type="file" id="filefield"> <input type="submit" name="Send" value="Отправить"> </form> в upload.cgi - #Для простоты доступа к параметрам use CGI qw(param); #получаем параметр file my $file = param('file'); # в скалярном контексте - это имя файла, но реално # это дескриптор переданного файла. # записываем переданный файл на диск open(NEW_FILE, ">upload/new_file.123") || die '...'; print NEW_FILE while (<$file>); ... пожалуй так... -- Best Regards, Dmitry Kuzmin --- ifmail v.2.15dev5.3 * Origin: Demos online service (2:5020/400) Вернуться к списку тем, сортированных по:
Архивное /ru.cgi.perl/65771a2cd66a.html, оценка из 5, голосов 10
|