Легенда:
 новое сообщение
 закрытая нитка
 новое сообщение
 в закрытой нитке
 старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
[CGI] помогите разобраться с сокетами! 10.09.01 23:03
Автор: alexW Статус: Незарегистрированный пользователь
|
Хочу написать простейшего клиента telnet :
use IO::Socket;
use IO::Select;
$server_port = 23 ;
$server = IO::Socket::INET->new(LocalPort => $server_port,
Type => SOCK_STREAM,
Reuse => 1,
Listen => 1)
or die "Couldn't be a tcp server on port $server_port : $@\n";
$client = $server->accept();
while ( <>) {
$client->send($_."\n",0) or die "$!\n";
#Данные посылает а вот обратно не читает из клиента
$data = <$server> ; # как тут поступить?
print $data;
}
close ($server);
|
|
|
подробно о проекте
Анализ криптографических сетевых... 
