| line |
true |
false |
branch |
|
54
|
0 |
0 |
if (exists $_attrs{$name}) { } |
|
68
|
0 |
0 |
if (defined $args{$key} and $self->_accessible("_$key")) { } |
|
93
|
0 |
0 |
unless my $socket = "Net::HTTP"->new("Host", $self->{'_host'}, "PeerPort", $self->{'_port'}, "HTTPVersion", "1.1", "KeepAlive", $self->{'_keep_alive'}, "Timeout", $self->{'_timeout'}) |
|
99
|
0 |
0 |
if $self->{'_user'} |
|
100
|
0 |
0 |
if $self->{'_password'} |
|
130
|
0 |
0 |
if ($AUTOLOAD =~ /.*::_get(_\w+)/ and $self->_accessible($1)) |
|
135
|
0 |
0 |
if ($AUTOLOAD =~ /.*::_set(_\w+)/ and $self->_accessible($1)) |
|
148
|
0 |
0 |
if (my $socket = $self->_get_socket) |
|
163
|
0 |
0 |
if (length $query <= 7000) { } |
|
191
|
0 |
0 |
scalar @prepared_rows ? : |
|
207
|
0 |
0 |
if ($@) |
|
210
|
0 |
0 |
unless ($code == 200) |
|
214
|
0 |
0 |
unless ($result->[0] eq "Ok.") |
|
223
|
0 |
0 |
if ($code == 200) { } |
|
228
|
0 |
0 |
if (defined $add_mess) |
|
241
|
0 |
0 |
unless defined $n |
|
242
|
0 |
0 |
unless $n |
|
245
|
0 |
0 |
substr($buf, -1) eq "\n" ? : |
|
247
|
0 |
0 |
if $chunk |
|
272
|
0 |
0 |
if (ref $value eq "HASH") |
|
276
|
0 |
0 |
unless (defined $value) |
|
279
|
0 |
0 |
if (ref $value eq "ARRAY") |
|
282
|
0 |
0 |
if (defined $value and not &looks_like_number($value)) |
|
293
|
0 |
0 |
if ($type eq 'NULL') { } |
|
|
0 |
0 |
elsif ($type eq 'STRING') { } |
|
|
0 |
0 |
elsif ($type eq 'ARRAY') { } |
|
297
|
0 |
0 |
if utf8::is_utf8($value) |