Всем привет,
вот тут проблема,
сижу под виндой, нужно быстрое открытие сокета и его закрытие при неудаче.
my $sock = IO::Socket::INET->new(PeerAddr => $host,
PeerPort => $port,
Proto => \'tcp\',
Timeout => 2,
$self->_extra_sock_opts($host, $port),
);
так, вот сколько Timeout не ставь все равно томозит более 10 секунд.
как бы так сделать, что бы если в две секунды не был получен ответ, закрыть сокет и не тратить драгоценное время?