Branch Coverage

lib/Log/Report/Template/Extract.pm
Criterion Covered Total %
branch 18 30 60.0


line true false branch
36 0 3 unless $self->{'LRTE_domain'} = $args->{'domain'}
55 0 3 unless my $pattern = $opts{'pattern'} || $self->pattern
59 0 3 unless open my $in, "<:encoding($charset)", $fn
69 0 3 if (ref $pattern eq 'CODE') { }
3 0 elsif ($pattern =~ /^TT([12])-(\w+)$/) { }
84 1 17 defined $plural ? :
18 0 if not $msgid =~ /\&\w+\;/ and defined $plural ? !($plural =~ /\&\w+\;/) : 1
85 0 0 if defined $plural
97 0 3 $version == 1 ? :
113 4 30 if ($take =~ /$pipe_func_block/)
115 0 4 if (@frags < 2 or not $frags[1] =~ /^\s*END\s*$/)
119 0 4 $msgid =~ s/\|(.*)// ? :
129 1 29 if ($take =~ /$msgid_pipe_func/)
132 0 1 $msgid =~ s/\|(.*)// ? :
148 1 12 $msgid =~ s/\|(.*)// ? :