|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Eugeny Khoodyshkin 2:5004/16.46 17 Apr 2001 15:34:06 To : Konstantin Ursaloff Subject : Форма для загрузки файлов на сервер? Какой предел размера? --------------------------------------------------------------------------------
Приветствую, Konstantin !!!
17 Апр 2001 11:26, Konstantin Ursaloff НН. All:
KU> Я пытался загрузить текстовый файл.
KU> Как обработать его с помощью CGI.pm инфу не нашел, просвятите если кто
KU> то знает, пробую прочитать все данные из STDIN вот что вышло.
Чтобы прочесть файл, который ты закачал на сервер при помощи <input type="file"
name="CoolName"> вполне подойдет следующая конструкция (по крайней мере в
Apache):
#!/usr/bin/perl
use CGI;
$uName=param('CoolName');
$fName=tmpFileName($uName);
# теперь в $fName полный путь и имя временного файла, в котором
# содержатся данные, переданные на сервер.
open(FILE,"<$fName");
binmode(FILE); # если это бинарный файл
# делаем, что хотим
close(FILE);
unlink($fName);
До свидания.
С уважением Евгений.
--- GoldED+/386 1.1.4.7
* Origin: Evgesha MS Mail Station. (2:5004/16.46)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/33453adc64c1.html, оценка из 5, голосов 10
|