|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Mihail Popov 2:4653/10.45 26 Apr 2006 21:26:00
To : Alexander Zigar'
Subject : Вопросец
--------------------------------------------------------------------------------
Hа дворе было 11:05 Среда Апрель 26 2006, Alexander Zigar' писал Mihail Popov:
MP>> open (OUTFILE,">>file.gif");
AZ> binmode OUTFILE;
MP>> while ($bytesread=read($filename,$buffer,1024)) {
MP>> print OUTFILE $buffer;
MP>> }
MP>> close OUTFILE;
Спасибо, хотя как раз сегодня наконец-то я и сам до этого
допер. Смущает, что в в доке к cgi.pm приводится пример обработки
именно бинарного файла и как раз без binmode. Поэтому я считал,
что так и должно быть. А понял я это только тогда, когда написал
свою функцию исправления этой ошибки, расположил ее перед print
и каково же было мое удивление, когда функция никаких ошибок не
обнаружила...
AZ> perldoc -f binmode
AZ> либо
AZ> Perl in nutshell
Видел бы ты, как я извращался с этим binmode... Hо только
не туда его применял, я считал, что файл портится при пересылке.
Кстати, хочу еще спросить. При приеме файла модуль cgi сохраняет
копию этого файла во временной директории. Хочется узнать, этот
файл вручную потом удалять или можно как-то его не создавать?
С уважением, Mihail.
---
* Origin: Hаше кредо: Всегда. (2:4653/10.45)
Вернуться к списку тем, сортированных по:
|
