Forum Webscript.Ru
Программирование => Perl => Тема начата: val от 01 Ноября 2001, 00:55:33
-
Как затащить на сервер картинку клиента через броузер? Через file сам файл создается, но в него ничего не записывается. Подскажите кто знает как это сделать в Perl.
-
http://forums.webscript.ru/showthread.php?s=&threadid=1398
-
Спасибо NAS, я это уже смотрел. 1-й предложенный сценарий не проходит. На строку while (<$in>) сервер отвечает, что это не массив и что не возможно обращаться с таким предложением к неоткрытому failhandle.
А на обращение к zip получаю отсутствие такого сервера.
-
Читай доку по upload...
Там примеры есть (ActivePerl).
-
строку while (<$in> ) сервер отвечает, что это не массив и что не возможно обращаться с таким предложением к неоткрытому failhandle.
А у вас включена прагма strict? Такое сообщение выдается при ней, для обхода этого явления в модуле CGI есть новый метод получения дескриптора:
$fh=$obj->upload(\'upfile\');#GET Filehandle
и далее как обычно, только $fh используется в качестве дескриптора.
-
могу предложить ознакомиться с моим вариантом :)
http://webmetr.pips.ru/read/cont/?2
-
могу предложить ознакомиться с моим вариантом
Да неплохо, только если написать вначале скрипта
use strict;
работать не будет, т.к. дескриптор Перлу тогда не понравится ;)
-
Да неплохо, только если написать вначале скрипта
use strict;
работать не будет, т.к. дескриптор Перлу тогда не понравится
Это может быть странно, но после добавления use strict дескриптор ему понравился. ;)
-
но после добавления use strict дескриптор ему понравился.
;) Тут многое зависит от броузера/имени файла, я лишь пересказал доку по CGI, где они сами говорят об этом:
However, there are problems with the dual nature of the upload fields.
If you