Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: Perl телнет сервер  (Прочитано 6421 раз)
0 Пользователей и 1 Гость смотрят эту тему.
Mayor
Специалист

ru
Offline Offline

« : 03-04-2005 04:17 » 

В общем пытаюсь на перле написать телнет сервер --- перл скрипт начинает прослушивать заданый порт и выводить все переданое по нему на экран, проблемма возникла с обратоной передачей по идее в ответ мнформация должа вводиться с клавиатуры и тут же остсылаться на подконектившийся хост, но select class в упор отказывается работать с stdin
подскажите как к селект объекту добавить stdin и так что бы select стал реагировать на каждое нажатие клавиши ....
Записан

1n c0de we trust
RXL
Технический
Администратор

ru
Offline Offline
Пол: Мужской

WWW
« Ответ #1 : 03-04-2005 10:34 » new

http://www.cpan.org/modules/by-module/IO/IO-Select-Trap-0.032.readme
Цитата
IO::Select::Trap - IO::Select() functionality on Scalar-based Filehandles
Стандартные дескрипторы perl-а тут не помогут.
Посмотри http://www.cpan.org/modules/by-module/IO/ - есть IO::Tty.

Может сервер лучше делать на более специализированных модулях?
Напр. посмотри тут: http://www.cpan.org/modules/by-category/16_Server_and_Daemon_Utilities/NetServer/
Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines