| blib/lib/Pugs/Runtime/Tracer.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 18 | 88.8 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 1 | 1 | $res ? : |
| 24 | 0 | 5 | unless (defined $main::PCR_TRACE_FH) |
| 32 | 0 | 3 | unless open my $in, '<', \$s |
| 36 | 7 | 8 | if (/\s+## <(\w+)>$/) { } |
| 1 | 7 | elsif (/(\s+)## pos: (\d+) (\d+)$/) { } | |
| 6 | 1 | elsif (m[(\s+)## (\w+)>$]) { } | |
| 56 | 1 | 5 | if (not defined $name or $n ne $name) { } |
| 1 | 4 | elsif ($has_pos) { } | |
| 67 | 4 | 1 | unless ($has_pos) |