| line |
true |
false |
branch |
|
70
|
0 |
0 |
unless (defined $dbi) |
|
73
|
0 |
0 |
unless (defined $args{'on_connect'} and ref $args{'on_connect'} eq 'CODE') |
|
79
|
0 |
0 |
if (defined $args{'on_error'}) |
|
80
|
0 |
0 |
unless (ref $args{'on_error'} eq 'CODE') |
|
87
|
0 |
0 |
unless (defined $child and defined $parent) |
|
96
|
0 |
0 |
if ($pid) { } |
|
|
0 |
0 |
elsif (defined $pid) { } |
|
108
|
0 |
0 |
unless (defined $self and exists $$self{'child'}) |
|
114
|
0 |
0 |
if ($len > 0) { } |
|
|
0 |
0 |
elsif (defined $len) { } |
|
|
0 |
0 |
elsif ($! != 11) { } |
|
120
|
0 |
0 |
if ($@) { } |
|
121
|
0 |
0 |
if Lim::DEBUG() |
|
126
|
0 |
0 |
if ($errstr) |
|
133
|
0 |
0 |
if Lim::DEBUG() |
|
141
|
0 |
0 |
if Lim::DEBUG() |
|
148
|
0 |
0 |
if (defined $response and exists $$self{'cb'}) |
|
149
|
0 |
0 |
unless (ref $response eq 'ARRAY') |
|
151
|
0 |
0 |
if Lim::DEBUG() |
|
182
|
0 |
0 |
if (exists $$self{'close_fds'} and $$self{'close_fds'}) |
|
186
|
0 |
0 |
unless ($_ == $parent_fno) |
|
195
|
0 |
0 |
if ($len > 0) { } |
|
|
0 |
0 |
elsif (defined $len) { } |
|
201
|
0 |
0 |
if ($@) |
|
212
|
0 |
0 |
if (defined $request) |
|
213
|
0 |
0 |
unless (ref $request eq 'ARRAY') |
|
223
|
0 |
0 |
if ($@) |
|
229
|
0 |
0 |
if ($@) |
|
238
|
0 |
0 |
unless (defined $len and $len > 0) |
|
244
|
0 |
0 |
if ($wrote >= $res_len) |
|
250
|
0 |
0 |
if ($wrote != $res_len) |
|
265
|
0 |
0 |
if Lim::OBJ_DEBUG() |
|
271
|
0 |
0 |
if Lim::OBJ_DEBUG() |
|
273
|
0 |
0 |
if (exists $$self{'child_pid'}) |
|
281
|
0 |
0 |
if (exists $$self{'child'}) |
|
296
|
0 |
0 |
unless (exists $METHOD{$method}) |
|
304
|
0 |
0 |
if ($@) |
|
324
|
0 |
0 |
unless (ref $cb eq 'CODE') |
|
328
|
0 |
0 |
unless (exists $METHOD{$method}) |
|
334
|
0 |
0 |
unless (exists $$self{'child'}) |
|
340
|
0 |
0 |
if ($$self{'busy'}) |
|
349
|
0 |
0 |
if ($@) |
|
357
|
0 |
0 |
if Lim::DEBUG() |
|
360
|
0 |
0 |
unless (defined $len and $len > 0) |
|
367
|
0 |
0 |
unless ($len >= length $request) |
|
374
|
0 |
0 |
unless (defined $self) |
|
379
|
0 |
0 |
unless (defined $len and $len > 0) |
|
387
|
0 |
0 |
unless ($len >= length $request) |
|
406
|
0 |
0 |
if (exists $$self{'child'}) |
|
424
|
0 |
0 |
unless ($$self{'dbh'} = 'DBI'->connect($dbi, $user, $pass, $attr)) |
|
438
|
0 |
0 |
unless (defined $$self{'dbh'}) |
|
456
|
0 |
0 |
unless (defined $$self{'dbh'}) |
|
460
|
0 |
0 |
unless ($sth = $$self{'dbh'}->prepare_cached($statement, undef, 1)) |
|
464
|
0 |
0 |
unless ($rv = $sth->execute(@args)) |
|
481
|
0 |
0 |
unless (defined $$self{'dbh'}) |
|
485
|
0 |
0 |
unless ($$self{'dbh'}->begin_work) |
|
499
|
0 |
0 |
unless (defined $$self{'dbh'}) |
|
503
|
0 |
0 |
unless ($$self{'dbh'}->commit) |
|
517
|
0 |
0 |
unless (defined $$self{'dbh'}) |
|
521
|
0 |
0 |
unless ($$self{'dbh'}->rollback) |