Branch Coverage

blib/lib/MLDBM/TinyDB.pm
Criterion Covered Total %
branch 95 300 31.6


line true false branch
23 12 1 if (ref($db{$table}) =~ /MLDBM::TinyDB/) { }
1 0 elsif (ref($db{$table}) =~ /ARRAY/) { }
47 0 2 unless tie %{$$self{'TIEHASH'};}, 'MLDBM', $table, $mode, $perms
50 2 0 unless ($proc = ${$$self{'TIEHASH'};}{'tree'})
56 0 2 unless defined $proc
60 1 1 if (not $branch) { }
64 1 0 if (@extfiles > 0)
80 1 1 if defined $$self{'UP'}
97 1 4 if (ref($_) =~ /ARRAY/) { }
114 0 0 if (ref($_) =~ /ARRAY/)
127 0 0 unless (eval $str)
128 0 0 if $@
133 0 0 if (eval $criteria) { }
0 0 elsif ($@) { }
135 0 0 if $limit and $limit == @found
149 0 1 unless (eval $str)
150 0 0 if $@
155 3 2 if (eval $criteria) { }
0 2 elsif ($@) { }
157 0 3 if $limit and $limit == @found
178 0 0 if $@
179 0 0 if (@reg == 0)
188 0 0 if (@ex == 0 and @keys == 1) { }
0 0 elsif (@ex == 0 and @keys == 2) { }
189 0 0 if $reg[0][5] == 0
190 0 0 if $reg[0][5] == 2
191 0 0 if $reg[0][5] == 1
192 0 0 if $reg[0][5] == 3
194 0 0 unless $$a[1] cmp $$b[1]
0 0 if $reg[0][5] == 0 and $reg[1][5] == 0
197 0 0 unless $$a[1] cmp $$b[1]
0 0 if $reg[0][5] == 0 and $reg[1][5] == 2
200 0 0 unless $$a[1] cmp $$b[1]
0 0 if $reg[0][5] == 0 and $reg[1][5] == 1
203 0 0 unless $$a[1] cmp $$b[1]
0 0 if $reg[0][5] == 0 and $reg[1][5] == 3
207 0 0 unless $$b[1] cmp $$a[1]
0 0 if $reg[0][5] == 2 and $reg[1][5] == 0
210 0 0 unless $$b[1] cmp $$a[1]
0 0 if $reg[0][5] == 2 and $reg[1][5] == 2
213 0 0 unless $$b[1] cmp $$a[1]
0 0 if $reg[0][5] == 2 and $reg[1][5] == 1
216 0 0 unless $$b[1] cmp $$a[1]
0 0 if $reg[0][5] == 2 and $reg[1][5] == 3
220 0 0 unless $$a[1] <=> $$b[1]
0 0 if $reg[0][5] == 1 and $reg[1][5] == 0
223 0 0 unless $$a[1] <=> $$b[1]
0 0 if $reg[0][5] == 1 and $reg[1][5] == 2
226 0 0 unless $$a[1] <=> $$b[1]
0 0 if $reg[0][5] == 1 and $reg[1][5] == 1
229 0 0 unless $$a[1] <=> $$b[1]
0 0 if $reg[0][5] == 1 and $reg[1][5] == 3
233 0 0 unless $$b[1] <=> $$a[1]
0 0 if $reg[0][5] == 3 and $reg[1][5] == 0
236 0 0 unless $$b[1] <=> $$a[1]
0 0 if $reg[0][5] == 3 and $reg[1][5] == 2
239 0 0 unless $$b[1] <=> $$a[1]
0 0 if $reg[0][5] == 3 and $reg[1][5] == 1
242 0 0 unless $$b[1] <=> $$a[1]
0 0 if $reg[0][5] == 3 and $reg[1][5] == 3
249 0 0 if $$e[0]
251 0 0 if $$e[0]
276 0 2 if $@
277 0 2 if (@reg == 0)
286 1 1 if (@ex == 0 and @keys == 1) { }
0 1 elsif (@ex == 0 and @keys == 2) { }
287 1 0 if $reg[0][5] == 0
288 0 1 if $reg[0][5] == 2
289 0 1 if $reg[0][5] == 1
290 0 1 if $reg[0][5] == 3
292 0 0 unless $$a[1] cmp $$b[1]
0 0 if $reg[0][5] == 0 and $reg[1][5] == 0
295 0 0 unless $$a[1] cmp $$b[1]
0 0 if $reg[0][5] == 0 and $reg[1][5] == 2
298 0 0 unless $$a[1] cmp $$b[1]
0 0 if $reg[0][5] == 0 and $reg[1][5] == 1
301 0 0 unless $$a[1] cmp $$b[1]
0 0 if $reg[0][5] == 0 and $reg[1][5] == 3
305 0 0 unless $$b[1] cmp $$a[1]
0 0 if $reg[0][5] == 2 and $reg[1][5] == 0
308 0 0 unless $$b[1] cmp $$a[1]
0 0 if $reg[0][5] == 2 and $reg[1][5] == 2
311 0 0 unless $$b[1] cmp $$a[1]
0 0 if $reg[0][5] == 2 and $reg[1][5] == 1
314 0 0 unless $$b[1] cmp $$a[1]
0 0 if $reg[0][5] == 2 and $reg[1][5] == 3
318 0 0 unless $$a[1] <=> $$b[1]
0 0 if $reg[0][5] == 1 and $reg[1][5] == 0
321 0 0 unless $$a[1] <=> $$b[1]
0 0 if $reg[0][5] == 1 and $reg[1][5] == 2
324 0 0 unless $$a[1] <=> $$b[1]
0 0 if $reg[0][5] == 1 and $reg[1][5] == 1
327 0 0 unless $$a[1] <=> $$b[1]
0 0 if $reg[0][5] == 1 and $reg[1][5] == 3
331 0 0 unless $$b[1] <=> $$a[1]
0 0 if $reg[0][5] == 3 and $reg[1][5] == 0
334 0 0 unless $$b[1] <=> $$a[1]
0 0 if $reg[0][5] == 3 and $reg[1][5] == 2
337 0 0 unless $$b[1] <=> $$a[1]
0 0 if $reg[0][5] == 3 and $reg[1][5] == 1
340 0 0 unless $$b[1] <=> $$a[1]
0 0 if $reg[0][5] == 3 and $reg[1][5] == 3
347 1 1 if $$e[0]
349 1 1 if $$e[0]
370 2 8 if @list == 0
374 6 4 if (defined $$self{'UP'})
375 0 6 if (ref($db{$$self{'UP'}}) =~ /ARRAY/)
378 0 6 unless defined $db{$$self{'UP'}}
384 22 0 if (defined $spec[$i])
388 16 6 if (exists $$href{'nodes'})
389 16 0 if (defined $db{$$self{'UP'}}) { }
393 10 6 if @temp > 0
403 5 1 if (@temp)
404 0 5 if (ref($db{$e}) =~ /ARRAY/)
408 3 2 if ($ext and @{$$href{$e};} > 0)
417 3 7 wantarray ? :
444 1 2 if (@list == 0)
450 1 2 if (defined $$self{'UP'})
451 0 1 if (ref($db{$$self{'UP'}}) =~ /ARRAY/)
454 0 1 unless defined $db{$$self{'UP'}}
464 9 0 if (defined $$to[$i]) { }
465 8 1 if (not defined $spec[$i]) { }
467 2 6 unless defined $last
469 2 6 $list[$i] < 1 ? :
478 0 8 if defined $created
479 0 8 if defined $updated
483 1 0 if (@{$$self{'DOWN'};})
488 0 1 if (defined $$href{$e})
497 0 1 if defined $updated
500 4 5 if (@{$$self{'DOWN'};})
503 0 4 if (not defined $$to[$i]{$e}) { }
4 0 elsif (ref($$to[$i]{$e}) =~ /ARRAY/) { }
508 0 4 if ref($$to[$i]{$e}[0]) =~ /ARRAY/
511 0 4 if (ref($db{$e}) =~ /ARRAY/)
515 4 0 if (defined $db{$e}) { }
536 5 4 if (defined $$self{'UP'})
538 5 0 if (not defined $$to[$i]{'nodes'}) { }
0 0 elsif (ref($$to[$i]{'nodes'}) =~ /ARRAY/) { }
575 4 6 if (@files > 0)
577 0 4 if (ref($db{$f}) =~ /ARRAY/)
584 4 9 if $what
586 9 4 unless $what
603 0 2 if @list == 0
611 2 0 if (defined $spec[$i])
614 1 1 if (defined $$self{'UP'})
615 1 0 if (exists $$href{'nodes'})
626 1 1 if (@{$$self{'DOWN'};})
630 1 0 if (defined $db{$e}) { }
660 5 4 wantarray ? :
700 0 0 if (@_)