Новые ответы

Не получается добавить свои параметры в header,

Наталья, 15-Дек-05, 14:11 [смотреть все]

Дело в том, что мне необходимо добавить свой параметр в head выходного файла.

Конструкция вида:
print cgi->header(-type => $type, -expires => $expires, -X_Status => $xstatus, -X_StatusEx => "crc=$buffercrc",-Content_crc => $buffercrc);
Выдает все, но без -Content_crc
а все остальное нормально. Попробовала запустить файл под unix ОС все работает нормаль, под винду не хочет, не подскажите, видимо это актив перл глючит, но очень надо импрвить этот баг... мож кто сталкивался.
По всем манам и докам, все должно работать.
Умные люди посоветовали переустановить перл. но у меня и так самая распоследняя версия :)

Ответить | Сообщить модератору

Не получается добавить свои параметры в header, Kannabismus, 15:54 , 17-Дек-05 (1)
Ищите ошибку в передаваемых параметрах.
; use CGI
; my ($type, $expires, $xstatus, $buffercrc) = qw/type expire xstatus buffercrc/
; print CGI->header(-type => $type, -expires => $expires, -X_Status => $xstatus, -X_StatusEx => "crc=$buffercrc", -Content_crc => $buffercrc);
Expires: expire
Date: Sat, 17 Dec 2005 12:52:37 GMT
Content-crc: buffercrc
X-statusex: crc=buffercrc
X-status: xstatus
Content-Type: type
>perl -v
This is perl, v5.8.7 built for MSWin32-x86-multi-thread
(with 7 registered patches, see perl -V for more detail)
Copyright 1987-2005, Larry Wall
Binary build 813 [148120] provided by ActiveState http://www.ActiveState.com
ActiveState is a division of Sophos.
Built Jun 6 2005 13:36:37
Ответить | Сообщить модератору

Не получается добавить свои параметры в header, Makc2K, 13:33 , 21-Дек-05 (2)
Должно работать! Если передаваемая переменная не пуста, то все должно отображаться. В описании cgi сказанно, что если метода не существует, то он его все равно отработает. Например q->H1(q->QWERTY("test")) сгенерирует <H1><QWERTY>test</QWERTY></H1>. Думаю это такая реализация activeperl CGI. Можно напечатать ручками хотя это полумера.
Ответить | Сообщить модератору