| 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) |