line |
true |
false |
branch |
29
|
0 |
1 |
if not $charset and $fn =~ m(\.([\w-]+)(?:\@[^/\\]+)?\.g?mo$)i |
33
|
0 |
1 |
if (defined $charset) |
34
|
0 |
0 |
unless $enc = &find_encoding($charset) |
48
|
0 |
1 |
unless open $fh, '<:raw', $fn |
56
|
0 |
1 |
unless CORE::read $fh, $magic, 4 |
59
|
0 |
0 |
$magic eq "\225\cD\cR\336" ? : |
|
1 |
0 |
$magic eq "\336\cR\cD\225" ? : |
66
|
0 |
1 |
unless CORE::read $fh, $superblock, 24 |
76
|
0 |
1 |
unless seek $fh, $offset_orig, 0 |
80
|
0 |
1 |
unless CORE::read $fh, $originals, $nr_strings * 8 |
87
|
0 |
1 |
unless seek $fh, $offset_trans, 0 |
91
|
0 |
1 |
unless CORE::read $fh, $translations, $nr_strings * 8 |
103
|
0 |
1 |
unless seek $fh, $orig_start, 0 |
109
|
0 |
1 |
unless CORE::read $fh, $orig_block, $orig_block_size |
114
|
0 |
1 |
unless seek $fh, $trans_start, 0 |
119
|
0 |
1 |
unless CORE::read $fh, $trans_block, $trans_block_size |
126
|
0 |
13 |
$msgid_b =~ s/(.*)\x04// ? : |
131
|
1 |
12 |
unless (defined $charset) |
132
|
0 |
1 |
unless $msgid_b eq '' |
135
|
1 |
0 |
$msgstr_b =~ /^content-type:.*?charset=["']?([\w-]+)/im ? : |
139
|
0 |
1 |
unless $enc = &find_encoding($charset) |
147
|
0 |
13 |
@msgstr > 1 ? : |
150
|
0 |
1 |
unless close $fh |
174
|
0 |
0 |
unless my $po = $_[0]->msgid($_[1], $_[3]) |
177
|
0 |
0 |
unless ref $po |
182
|
0 |
0 |
defined $_[2] ? : |
|
0 |
0 |
unless $$po[$_[0]{'algo'}->(defined $_[2] ? $_[2] : 1)] |