Perl IO::Socket::SSL соединение. Тайм-аут игнорируется
У меня есть тот сценарий, который подключается к серверу и отправляет данные. Затем отключается.
Для одного из серверов я вижу странное поведение.
Код выглядит так
$socket = IO::Socket::SSL(PeerAddr => $host,PeerPort => $port,Timeout=>5,SSL_version=>$SSL_Version)
Сценарий запускается, и этот код работает нормально. Но только 32 раза. Когда я выполняю эту функцию в течение 33 раз, она застряла в этом месте. Тайм-аут не соблюдается. Сценарий остается в этом месте, пока я его не убью.
После перезагрузки он может снова выполнить 32 подключения и снова застрять
В чем может быть причина? Почему таймаут игнорируется и соединение не прерывается через 5 секунд? Как заставить его потерпеть неудачу?
И что может быть основной причиной? Почему соединения работают и только после 32 успешных подключений я вижу проблему?