Ключевые слова:web, file, cgi, (найти похожие документы)
Date: Tue, 17 Apr 2001 14:34:06 +0400
From: Eugeny Khoodyshkin <Eugeny.Khoodyshkin@p46.f16.n5004.z2.fidonet.org>
Newsgroups: fido7.ru.cgi.perl
Subject: [WEB] Форма для загрузки файлов на сервер
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);
До свидания.
С уважением Евгений.
