perl socket

Ответ от Алексей Кузьминов[гуру]
А моей так себе гениальной соображалки хватило вот на это:
между
$socket->recv($recieved_data, 100);
$socket->send($recieved_data);
клиент вполне мог отсоединиться от сервера.
И вы почему-то используете разные типы сокетов на клиенте и сервере.
Попробуйте нечто более простое, и вроде даже работающее:

Ответ от 3 ответа[гуру]

Ответ от 3 ответа[гуру]