Branch Coverage

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+)## $]) { }
56 1 5 if (not defined $name or $n ne $name) { }
1 4 elsif ($has_pos) { }
67 4 1 unless ($has_pos)