Branch Coverage

blib/lib/Lingua/StarDict/Gen.pm
Criterion Covered Total %
branch 0 64 0.0


line true false branch
25 0 0 if (ref $_[0] eq 'HASH')
27 0 0 if ($opt{'type'} eq 'default')
28 0 0 if ($opt{'type'} eq 'term')
32 0 0 unless open IN, "<$file"
35 0 0 if (/^%enc(oding)?\s+([a-zA-Z0-9-]+)/l) { }
0 0 elsif ($opt{'type'} eq 'term') { }
0 0 elsif ($opt{'type'} eq 'default' and /(.*?)\s*\{\s*(.*?)\s*\}/l) { }
39 0 0 if not $opt{'lang'} and /(\w+)/l
44 0 0 if (/(\w+)\s+(.*)/ls)
79 0 0 if ($^O eq 'linux') { }
0 0 elsif ($^O eq 'darwin') { }
0 0 elsif ($^O eq 'MSWin32') { }
83 0 0 if -d $d
84 0 0 if -d '/usr/local/share/stardict/dic/'
86 0 0 unless (-d $finalpath)
87 0 0 unless mkdir $finalpath, 493
91 0 0 unless open DICT, '>:raw:utf8', "$finalpath2.dict"
92 0 0 unless open IDX, '>:raw', "$finalpath2.idx"
93 0 0 unless open IFO, '>:raw', "$finalpath2.ifo"
102 0 0 unless utf8::is_utf8($chave)
110 0 0 if (ref $$hash{$chave} eq 'ARRAY') { }
0 0 elsif (ref $$hash{$chave}) { }
113 0 0 if (ref $_)
144 0 0 if ($^O eq 'MSWin32') { }
153 0 0 unless utf8::is_utf8($string)
180 0 0 if length $s1 == 0
181 0 0 if length $s2 == 0
186 0 0 if $c1 ne $c2
196 0 0 if length $s1 == 0
197 0 0 if length $s2 == 0
202 0 0 if $c1 ne $c2
212 0 0 if $i