--- ext/Sys/Syslog/Syslog.pm.orig 2007-12-18 10:47:07.000000000 +0000 +++ ext/Sys/Syslog/Syslog.pm 2009-06-10 09:39:14.000000000 +0000 @@ -741,7 +741,7 @@ sub connection_ok { my $rin = ''; vec($rin, fileno(SYSLOG), 1) = 1; - my $ret = select $rin, undef, $rin, 0.25; + my $ret = select $rin, undef, $rin, 0; return ($ret ? 0 : 1); }