[Moscow.pm] непонятный стук

[Ivan Petrov]

>>> http://pzz.livejournal.com/9564.html
>> 
>> спасибо за ссылку. хгм
>> 
>> my $s = IO::Socket::INET->new(PeerAddr => '127.0.0.1', PeerPort =>
>> $port, ReuseAddr => 1, LocalAddr => '127.0.0.1', LocalPort => 9110);
>> 
>> теперь на эту ошибку нарывается только сам скрипт. то есть раз в
>> секунду две вылетает пачка ошибок и дальше проблема рассасывается
>> 
>> вопрос остается: как модифицировать данный скрипт чтобы вообще не
>> налетать на данную проблему? вручную перебирать порты до удачного
>> результата?

> Убрать LocalPort, пусть система сама перебирает. LocalPort для
> исходящих сокетов мало когда имеет смысл назначать.

в статье написано (и это получается так и есть), что если локалпорт не
указывать, то и опция ReuseAddr тоже смысла не имеет.

то есть код IO::Socket::INET->new(PeerAddr => '127.0.0.1', PeerPort =>
$port, ReuseAddr => 1);

точно так же приводит к тому что данное приложение кроме себя мешает
жить и остальным тоже