>>> 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); точно так же приводит к тому что данное приложение кроме себя мешает жить и остальным тоже -- Moscow.pm mailing list [email protected] | http://moscow.pm.org
