| blib/lib/Test/Dynamic.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 28 | 37 | 75.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 112 | 19161 | 253 | 18 | /^}[^;]/ and not /##/ |
| 19414 | 18 | 0 | /^}[^;]/ and not /##/ and @sublist | |
| 184 | 27 | 0 | 1 | /^\s*;\s*##/o and not $lineskip{$line} |
| 199 | 597 | 76 | 0 | $currentsub eq 'MAIN' and $atend |
| 285 | 559 | 0 | 0 | $verbose_count >= 3 and $subcount{$sub} != $oldscore |
| line | l | !l | condition |
|---|---|---|---|
| 40 | 3 | 1 | $$arg{'filehandle'} || die("Need a filehandle argument\n") |
| 131 | 6 | 228 | $sublist[-1] || 'MAIN' |
| 146 | 60 | 6 | $1 || '' |
| 0 | 66 | $2 || 0 | |
| 154 | 1 | 2 | $ENV{$name} || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 72 | 3 | 3 | 0 | $firstline ||= $. |
| 96 | 15 | 3 | 0 | $lastline ||= $line |
| 100 | 6 | 0 | 20706 | /^__DATA__/ or /^__END__/ |
| 275 | 327 | 133 | 3 | $sub ne 'MAIN' or $line < $lastline |