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