| line |
true |
false |
branch |
|
25
|
0 |
1 |
unless $self->{'LRET_domain'} = $args->{'domain'} |
|
44
|
0 |
1 |
unless my $pattern = $opts{'pattern'} || $self->pattern |
|
49
|
0 |
1 |
unless open IN, "<:encoding($charset)", $fn |
|
59
|
0 |
1 |
if (ref $pattern eq 'CODE') { } |
|
|
1 |
0 |
elsif ($pattern =~ /^TT([12])-(\w+)$/) { } |
|
73
|
1 |
11 |
defined $plural ? : |
|
|
12 |
0 |
if not $msgid =~ /\&\w+\;/ and defined $plural ? !($plural =~ /\&\w+\;/) : 1 |
|
75
|
0 |
0 |
if defined $plural |
|
87
|
0 |
1 |
$version == 1 ? : |
|
103
|
1 |
11 |
if ($take =~ /$pipe_func_block/) |
|
105
|
0 |
1 |
if (@frags < 2 or not $frags[1] =~ /^\s*END\s*$/) |
|
110
|
0 |
1 |
$msgid =~ s/\|(.*)// ? : |
|
120
|
1 |
10 |
if ($take =~ /$msgid_pipe_func/) |
|
123
|
0 |
1 |
$msgid =~ s/\|(.*)// ? : |
|
140
|
1 |
9 |
$msgid =~ s/\|(.*)// ? : |