Кусок кода частично заимствованный из perlipc: for ( ; $paddr = accept(CLIENT_H, SERVER_H); close CLIENT_H) { print CLIENT_H "Test",$EOL; while (<CLIENT_H>) { if ($_ eq "switch") { print CLIENT_H "$_",$EOL; } } } Вот если while закомнтировать то при подключении строка Test выдается клиенту. А если так как есть - то нет(Можно объянить почему?? или линк дать и как это исправить???). Вообщем нужно чтоб клиент вводил команды, а сервер ему отвечал....
Ответ на:
комментарий
от Casus
Ответ на:
комментарий
от tugrik
Ответ на:
комментарий
от anonymous
Ответ на:
комментарий
от tugrik
Ответ на:
комментарий
от Casus
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.
Похожие темы
- Форум troubles with perl & tcp sockets (2006)
- Форум Perl. Сокеты. (2007)
- Форум Клиент-Сервер Socket linux (Музыкальный сервис) (2014)
- Форум perl Sockets (2002)
- Форум Perl binary socket (2013)
- Форум Perl IO::Socket (2007)
- Форум Парсинг логов в MySQL с помощью Perl скрипта (2017)
- Форум perl Выбор интерфейса IO::Socket (2015)
- Форум Perl: проблема совместимости «use Socket;» (2004)
- Форум sockets in perl and c (2001)