blib/lib/Perlbal/Test.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 16 | 24 | 66.6 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
345 | 0 | 90 | 0 | $pid and waitpid($pid, 1) > 0 |
387 | 0 | 5 | 140 | defined $cl and $cl > 0 |
390 | 1 | 139 | 0 | $rv = read($sock, $content, $cl) and ($cl -= $rv) > 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
176 | 17 | 9 | 67 | not $res or $res =~ /^ERR/ |
180 | 5 | 17 | 4 | $opts{'quiet_failure'} or $cmd eq 'shutdown' |
206 | 0 | 0 | 1 | not $res or $res =~ /^ERR/ |
374 | 741 | 145 | 0 | $firstline ||= $_ |
375 | 0 | 145 | 741 | not $_ or /^\r?\n/ |