Ошибку генерирует например такой код:<br><br>sub handler{<br> my $r = shift;<br> if( $r->has_request_body(\&handle_request) ){<br> return OK;<br> } else {<br> return handle_request($r);<br> }
<br>}<br><br>sub handle_request{<br> my $r = shift;<br> $r->request_body(); # если запрос сделан методом гет то здесь ошибка, выполнение хендлера прерывается<br> return OK;<br>}<br><br>Ну понятно, что можно в handler установить переменную, $r->request_body() в if запихать и все будет работать. Информация perl -V прилагается.
<br><br><div><span class="gmail_quote">22.12.06, <b class="gmail_sendername">Igor Sysoev</b> <<a href="mailto:is@rambler-co.ru">is@rambler-co.ru</a>> написал(а):</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
On Fri, 22 Dec 2006, Andrey Antonov wrote:<br><br>> Наконец-то перешел с 0.3.61 на 0.5.4, все что до этого не работало в<br>> 0.4.хтеперь работает, это здорово, весь новый функционал очень полезен<br>> для<br>> написания достаточно сложных хендлеров на перле.
<br>> Заметил, что $r->request_body стало возвращать ошибку "close() channel<br>> failed (9: Bad file descriptor)" если тело запроса пустое (например в<br>> обычном гет запросе). Хорошо бы это пофиксить, тк сейчас надо либо проверять
<br>> тип запроса, либо переменную специальную устанавливать, что не удобно.<br><br>Как выглядит перловый код ?<br><br><br>Игорь Сысоев<br><a href="http://sysoev.ru">http://sysoev.ru</a><br><br></blockquote></div><br>