line |
true |
false |
branch |
43
|
0 |
2 |
unless my $socket = 'IO::Socket::INET'->new('Proto', $self->protocol, 'PeerHost', $self->host, 'PeerPort', $self->port, 'Timeout', $self->timeout) |
50
|
0 |
2 |
unless $self->timeout |
53
|
0 |
2 |
if $Bloomd::Client::Config{'osname'} eq 'netbsd' or $Bloomd::Client::Config{'osname'} eq 'solaris' |
60
|
0 |
2 |
unless $socket->setsockopt(1, 20, $timeout) |
63
|
0 |
2 |
unless $socket->setsockopt(1, 21, $timeout) |
73
|
1 |
0 |
if $self->_has_socket |
81
|
0 |
0 |
$capacity ? : |
|
0 |
0 |
$prob ? : |
|
0 |
0 |
$in_memory ? : |
131
|
0 |
0 |
unless @keys |
146
|
0 |
0 |
unless @keys |
168
|
0 |
2 |
unless $socket->print($command . $Bloomd::Client::CRLF) |
172
|
0 |
1 |
if $line =~ /^Client Error:/ |
175
|
1 |
0 |
unless $line eq 'START' |
181
|
0 |
0 |
if $line eq 'END' |
191
|
1 |
1 |
unless (defined $line) |
193
|
1 |
0 |
if (any sub {
$_;
}
, $!{'EWOULDBLOCK'}, $!{'EAGAIN'}, $!{'ETIMEDOUT'}) |