--- Backend.pm,old 2008-02-01 11:52:22.000000000 -0800 +++ Backend.pm 2008-02-01 11:53:04.000000000 -0800 @@ -97,7 +97,7 @@ sub _wait_for_readability { my ($fileno, $timeout) = @_; - return 0 unless $fileno && $timeout; + return 0 unless defined($fileno) && $timeout; my $rin = ''; vec($rin, $fileno, 1) = 1;