| line |
true |
false |
branch |
|
27
|
0 |
0 |
unless (defined $self->{'CONVER'}) |
|
28
|
0 |
0 |
if (system 'recode >/dev/null 2>&1') { } |
|
49
|
0 |
0 |
if (-f $dir) { } |
|
53
|
0 |
0 |
if (not defined $self->{'LANG'} or __check_lang($self, $lang)) |
|
58
|
0 |
0 |
unless -d $dir |
|
61
|
0 |
0 |
if ($file =~ /(.*)\.(po|messages)$/) { } |
|
|
0 |
0 |
elsif ($file =~ /(.*)\.(\w+)\.(po|messages)$/) { } |
|
|
0 |
0 |
elsif (-d $file) { } |
|
64
|
0 |
0 |
if (not defined $self->{'LANG'} or __check_lang($self, $lang)) |
|
72
|
0 |
0 |
if (not defined $self->{'LANG'} or __check_lang($self, $lang)) |
|
85
|
0 |
0 |
if __check_lang($self, "en") |
|
98
|
0 |
0 |
unless -d $dir |
|
101
|
0 |
0 |
if ($file =~ /(\w+)\.(po|messages)$/) { } |
|
|
0 |
0 |
elsif ($file =~ /(.*)\.(\w+)\.(po|messages)$/) { } |
|
104
|
0 |
0 |
if (not defined $self->{'LANG'} or __check_lang($self, $lang)) |
|
110
|
0 |
0 |
if (not defined $self->{'LANG'} or __check_lang($self, $lang)) |
|
114
|
0 |
0 |
if $self->{'DEBUG'} |
|
118
|
0 |
0 |
if __check_lang($self, "en") |
|
131
|
0 |
0 |
if $regex gt $lang |
|
132
|
0 |
0 |
if ($lang =~ /^$regex$/i) |
|
156
|
0 |
0 |
if (defined $self->{'OUTPUT'}) { } |
|
165
|
0 |
0 |
if keys %{$reg;} >= $n_langs |
|
181
|
0 |
0 |
unless (defined $self->{'LANG'}) |
|
186
|
0 |
0 |
if __check_lang($self, $lang) |
|
198
|
0 |
0 |
if $self->{'DEBUG'} |
|
203
|
0 |
0 |
if ($codeline =~ /charset=([\w-]+)/) |
|
210
|
0 |
0 |
unless open F, $a |
|
|
0 |
0 |
if ($code eq '?' or $code =~ /utf-?8/i) { } |
|
211
|
0 |
0 |
unless open F, "$convert|" |
|
217
|
0 |
0 |
if $mi == 0 and /^msgid\s+""/ |
|
218
|
0 |
0 |
if (/"Content-Type:/ and /charset=([\w-]+)/) |
|
223
|
0 |
0 |
unless /\n\s*msgstr/ |
|
231
|
0 |
0 |
unless ($m1) |
|
236
|
0 |
0 |
if ($m2) |
|
245
|
0 |
0 |
if $self->{'DEGUB'} |
|
263
|
0 |
0 |
if ($h1 =~ /[a-z][a-z]/i) { } |
|
266
|
0 |
0 |
if not $h2 =~ /^en/i and $h1 eq $self->{'TMX'}{$h1}{$h2} |
|
269
|
0 |
0 |
unless keys %{$$self{"TMX"}{$h1};} |
|
283
|
0 |
0 |
if (defined $opt{'LANG'}) |
|
286
|
0 |
0 |
if $l =~ /^[a-z0-9_]+$/i |
|
288
|
0 |
0 |
if @list |
|
291
|
0 |
0 |
if defined $opt{'CONVERT'} |
|
292
|
0 |
0 |
if defined $opt{'OUTPUT'} |
|
293
|
0 |
0 |
if defined $opt{'DEBUG'} |