line |
true |
false |
branch |
25
|
0 |
1 |
if not $charset and $fn =~ m(\.([\w-]+)(?:\@[^/\\]+)?\.g?mo$)i |
29
|
0 |
1 |
if (defined $charset) |
30
|
0 |
0 |
unless $enc = &find_encoding($charset) |
44
|
0 |
1 |
unless open $fh, '<:raw', $fn |
52
|
0 |
1 |
unless CORE::read $fh, $magic, 4 |
55
|
0 |
0 |
$magic eq "\225\cD\cR\336" ? : |
|
1 |
0 |
$magic eq "\336\cR\cD\225" ? : |
62
|
0 |
1 |
unless CORE::read $fh, $superblock, 24 |
72
|
0 |
1 |
unless seek $fh, $offset_orig, 0 |
76
|
0 |
1 |
unless CORE::read $fh, $originals, $nr_strings * 8 |
83
|
0 |
1 |
unless seek $fh, $offset_trans, 0 |
87
|
0 |
1 |
unless CORE::read $fh, $translations, $nr_strings * 8 |
99
|
0 |
1 |
unless seek $fh, $orig_start, 0 |
105
|
0 |
1 |
unless CORE::read $fh, $orig_block, $orig_block_size |
110
|
0 |
1 |
unless seek $fh, $trans_start, 0 |
115
|
0 |
1 |
unless CORE::read $fh, $trans_block, $trans_block_size |
122
|
0 |
13 |
$msgid_b =~ s/(.*)\x04// ? : |
127
|
1 |
12 |
unless (defined $charset) |
128
|
0 |
1 |
unless $msgid_b eq '' |
131
|
1 |
0 |
$msgstr_b =~ /^content-type:.*?charset=["']?([\w-]+)/im ? : |
135
|
0 |
1 |
unless $enc = &find_encoding($charset) |
143
|
0 |
13 |
@msgstr > 1 ? : |
146
|
0 |
1 |
unless close $fh |
170
|
0 |
0 |
unless my $po = $_[0]->msgid($_[1], $_[3]) |
173
|
0 |
0 |
unless ref $po |
178
|
0 |
0 |
defined $_[2] ? : |
|
0 |
0 |
unless $$po[$_[0]{'algo'}->(defined $_[2] ? $_[2] : 1)] |