| line |
true |
false |
branch |
|
31
|
0 |
12 |
if not $charset and $fn =~ m(\.([\w-]+)(?:\@[^/\\]+)?\.po$)i |
|
35
|
1 |
11 |
if ($charset) { } |
|
36
|
0 |
1 |
unless open $fh, "<:encoding($charset):crlf", $fn |
|
41
|
0 |
11 |
unless open $fh, '<:raw:crlf', $fn |
|
51
|
11 |
214 |
unless ($charset) |
|
52
|
0 |
11 |
unless $msgid eq '' |
|
54
|
11 |
0 |
$msgstr[0] =~ /^content-type:.*?charset=["']?([\w-]+)/im ? : |
|
56
|
0 |
11 |
unless my $enc = &find_encoding($charset) |
|
66
|
1 |
224 |
@msgstr > 1 ? : |
|
72
|
302 |
801 |
if substr($line, 0, 1) eq '#' |
|
74
|
232 |
569 |
if ($line =~ /^\s*$/) |
|
75
|
223 |
9 |
if @msgstr |
|
79
|
0 |
569 |
if ($line =~ s/^msgctxt\s+//) { } |
|
|
225 |
344 |
elsif ($line =~ s/^msgid\s+//) { } |
|
|
4 |
340 |
elsif ($line =~ s/^msgstr\[(\d+)\]\s*//) { } |
|
|
224 |
116 |
elsif ($line =~ s/^msgstr\s+//) { } |
|
|
115 |
1 |
elsif ($last and $line =~ /^\s*\"/) { } |
|
98
|
2 |
10 |
if @msgstr |
|
100
|
0 |
12 |
unless close $fh |
|
129
|
0 |
13 |
unless my $po = $self->{'index'}{"$msgid#$ctxt"} |
|
132
|
4 |
9 |
unless ref $po |
|
135
|
0 |
9 |
unless $$po[$self->{'algo'}->($count // 1)] |
|
143
|
0 |
686 |
unless ($_[0] =~ /^\s*\"(.*)\"\s*$/) |
|
152
|
44 |
20 |
defined $_[0] && length $_[0] ? : |
|
155
|
4 |
60 |
if @escaped > 1 |