| line |
true |
false |
branch |
|
23
|
0 |
70 |
unless defined $_[0] |
|
26
|
58 |
12 |
if $_[0] =~ /^\x95\x04\x12\xde/ or $_[0] =~ /^\xde\x12\x04\x95/ |
|
37
|
48 |
2 |
if (length $var{'msgstr'} and $UseFuzzy || !$var{'fuzzy'}) { } |
|
|
0 |
2 |
elsif ($AllowEmpty) { } |
|
43
|
10 |
39 |
if ($var{'msgid'} eq '') { } |
|
49
|
4 |
45 |
if ($KeepFuzzy and $var{'fuzzy'}) |
|
85
|
42 |
35 |
/^ *$/ && %var ? : |
|
|
9 |
77 |
/^#, +(.*) *$/ ? : |
|
|
2 |
86 |
/^# (.*)$/ ? : |
|
|
120 |
88 |
/^"(.*)" *$/ ? : |
|
|
100 |
208 |
/^(msgid|msgstr) +"(.*)" *$/ ? : |
|
93
|
8 |
4 |
if keys %var != 0 |
|
95
|
0 |
11 |
if length $var{'msgstr'} |
|
97
|
11 |
0 |
if $var{'msgid'} eq '' |
|
101
|
2 |
9 |
wantarray ? : |
|
110
|
69 |
526 |
$1 eq 'Content-Type' ? : |
|
|
595 |
0 |
/^([^\x00-\x1f\x80-\xff :=]+):\s*(.*)$/ ? : |
|
112
|
69 |
0 |
if ($enc =~ /\bcharset=\s*([-\w]+)/i) |
|
117
|
23 |
46 |
if $InputEncoding =~ /^utf-?8$/i |
|
119
|
0 |
69 |
if $OutputEncoding =~ /^utf-?8$/i |
|
121
|
59 |
0 |
if (Locale::Maketext::Lexicon::option('decode') and !$OutputEncoding || $InputEncoding ne $OutputEncoding) |
|
126
|
0 |
59 |
if $] < 5.007001 |
|
141
|
234 |
177 |
if ($DoEncoding and $InputEncoding) |
|
142
|
72 |
162 |
$InputEncoding eq 'utf8' ? : |
|
150
|
0 |
410 |
if ($DoEncoding and $OutputEncoding) |
|
151
|
0 |
0 |
$OutputEncoding eq 'utf8' ? : |
|
173
|
9 |
69 |
$2 ? : |
|
|
0 |
78 |
$1 ? : |
|
181
|
9 |
13 |
/\A(\s*)%([1-9]\d*|\*)(\s*)\z/ ? : |
|
190
|
50 |
9 |
substr($content, 0, 4) eq "\336\cR\cD\225" ? : |
|
194
|
0 |
59 |
if unpack($tmpl, substr($content, 4, 4)) > 0 |
|
230
|
59 |
59 |
if $stro eq '' |
|
231
|
118 |
0 |
if length $strt |