|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Vadim Tzirulnicov 2:5020/400 24 Jun 2007 22:21:35 To : All Subject : Проблема с NetServer::Generic --------------------------------------------------------------------------------
Пишу сервер с ветвлением процессов (т.е. нужно, чтобы при завершении работы
пользователя с серверным скриптом онный не завершал свою работу).
Взял за основу
http://search.cpan.org/src/CHSTROSS/NetServer-Generic-1.03/examples/preforke
d-shttpd
, выбросил allowed и forbidden, стёр функцию обработки запроса и на её место
вписал:
my ($http) = sub {
print STDOUT '123';
return 0;
}
- не работает. Плюс при подключении пользователя к скрипту на терминал
выдаются сообщения вида:
+++ flock LOCK_EX failed on parent socket: +++ flock LOCK_EX failed on
parent so
cket: Operation not supported
Operation not supported
Пользвователь увидеть строку "123" и завершить сеанс работы со скриптом
может, только нажав на <ENTER>.
Разумеется, сам пример на cpan'е работает нормально, т.к. там сначала
получается ввод, а затем отправляется вывод.
Как быть ? Ввод от пользователя мне не требуется.
--- ifmail v.2.15dev5.3
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/657704b82bc2.html, оценка из 5, голосов 10
|