Branch Coverage

blib/lib/Text/Lorem/JA.pm
Criterion Covered Total %
branch 45 82 54.8


line true false branch
31 5 0 unless ($lazy)
42 0 0 unless (defined $_singleton)
52 0 3 unless (ref $self)
62 0 16 unless (ref $self)
66 0 16 unless ($$self{'loaded'})
72 0 16 unless ($chain > 0)
75 0 16 unless ($chain <= $$self{'chain'})
86 16 48 if $cand < 0
100 0 6 unless (ref $self)
104 0 6 unless ($$self{'loaded'})
125 0 24 if @cands == 0 or @cands == 1 and $cands[0] < 0
130 24 4 if ($next_cand >= 0)
136 0 24 unless @new_cands
153 0 6 unless (ref $self)
157 0 6 unless ($$self{'loaded'})
182 0 14 if @cands == 0 or @cands == 1 and $cands[0] < 0
187 14 2 if ($next_cand >= 0 and not $$dict[$next_cand] =~ /\A[\x{3002}\x{3001}\x{ff0e}\x{ff0c}]\z/mosx)
194 0 14 unless @new_cands
199 5 9 unless (@short_cands)
210 5 9 if (length $token > $length)
227 0 5 if (not ref $dictionary) { }
5 0 elsif (ref $dictionary eq 'SCALAR') { }
0 0 elsif (ref $dictionary eq 'IO') { }
0 0 elsif (eval { do { $dictionary->can('getline') } }) { }
235 5 65 unless defined $line
256 0 0 if ($filename) { }
258 0 0 unless (-f $pathname)
260 0 0 unless (-f $pathname)
269 0 0 unless ($pathname)
279 0 0 unless open my $handle, '<:encoding(UTF-8)', $filename
301 0 65 if $line =~ /^#/o
303 5 60 if ($step == 0) { }
5 55 elsif ($step == 1) { }
24 31 elsif ($step == 2) { }
315 5 19 if ($line eq '') { }
328 8 31 if ($tokens[0] eq '') { }
352 27 12 if ($token =~ /=/o) { }
371 0 166 unless $node
372 0 166 if ref $node eq 'ARRAY'
378 0 146 if (ref $node eq 'HASH') { }
146 0 elsif (ref $node eq 'ARRAY') { }