|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Maxim Yemelyanov 2:5020/400 10 Jul 2004 19:09:56
To : Artem Chuprina
Subject : Сессии (was: read POSTed data)
--------------------------------------------------------------------------------
Приветствую!
2 июля 2004 г. в 17:48:37 Вы стучались к Maxim Yemelyanov:
AC> Maxim Yemelyanov @ Fri, 2 Jul 2004 11:01:08 +0000 (UTC):
AC> MY> sub r_params
AC> MY> {
AC> MY> my $r = shift;
AC> MY> my %get = $r->args;
AC> MY> my $clen = $r->header_in('Content-Length') || 0; # значение есть
AC> MY> my $post = $r->content; # а тут пусто
AC> Видимо, уже кто-то зачитал.
Угу. Большое спасибо Andrew Alakozow, подтолкнул в нужную сторону.
AC> MY> Как под mod_perl-ом получить заPOSTенные данные?
AC> Если я правильно помню, Apache::Request сам ест собственно тело
AC> запроса, и его param() и upload() должны эмулировать аналоги из CGI.
AC> Так что по идее первый вариант должен быть правильным.
Таки да, простейший хендлер это показал.
Все было потому, что до этого в коде встречалось:
> my $cgi = new CGI;
> $self->_session( new CGI::Session('driver:InterBaseSQL', $cgi, {Handle =>
> $self->$self->dbh_sessions}) );
Это потому, что часть работала под Apache::Registry, а полностью переводить на
mod_perl я не спешил. И вот нарвался.
Теперь все перевел на mod_perl - эти глюки исчезли и... я даже не ожидал ТАКОГО
ускорения! :-)
Еще раз всем большое спасибо.
--
Удачи!
Максим
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5.3
* Origin: Enigma Soft (2:5020/400)
Вернуться к списку тем, сортированных по:
|
