Branch Coverage

blib/lib/XML/TMX/FromPO.pm
Criterion Covered Total %
branch 0 88 0.0


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'}