| line |
true |
false |
branch |
|
141
|
5 |
3 |
unless ($self->{$_key}) |
|
152
|
0 |
1 |
if $self->{'user'} |
|
153
|
0 |
1 |
if $self->{'password'} |
|
162
|
0 |
1 |
unless $self->{'socket'} = 'Net::HTTP::NB'->new('Host', $self->{'host'}, 'PeerPort', $self->{'port'}, 'HTTPVersion', '1.1', 'KeepAlive', $self->{'keep_alive'}) |
|
177
|
0 |
0 |
unless $select->can_read($self->{'nb_timeout'}) |
|
179
|
0 |
0 |
unless $code |
|
183
|
0 |
0 |
if $code |
|
184
|
0 |
0 |
if ($@) |
|
185
|
0 |
0 |
if $self->{'debug'} |
|
197
|
0 |
0 |
unless $l |
|
213
|
0 |
0 |
if $self->{'debug'} |
|
|
0 |
0 |
if ($t == 0) |
|
220
|
0 |
0 |
if $method eq 'POST' |
|
228
|
0 |
0 |
if ($_status ne '200') |
|
229
|
0 |
0 |
if $self->{'debug'} |
|
230
|
0 |
0 |
if $self->{'debug'} |
|
385
|
0 |
0 |
if (not defined $val) { } |
|
|
0 |
0 |
elsif (ref $val eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (defined $val and not &looks_like_number($val)) { } |
|
398
|
0 |
0 |
scalar @_rows ? : |
|
406
|
0 |
0 |
if ($_status == 200) |
|
408
|
0 |
0 |
if ($body->[0][0] eq 'Ok.') |
|
429
|
0 |
0 |
if $self->{'socket'} |