Branch Coverage

blib/lib/Data/Tabular/Dumper.pm
Criterion Covered Total %
branch 55 78 70.5


line true false branch
23 12 2 unless defined $$self{'master_key'}
29 23 0 if ($p2->can('open') and $p2->can('close') and $p2->can('write'))
34 0 23 if $@
35 23 0 if ($object)
44 0 14 unless $one
53 0 0 if 2 == @_
67 130 0 if ($code) { }
69 130 0 unless $@
73 0 130 if $@
92 0 46 unless $o->can('close')
114 0 12 if exists $INC{"Data/Tabular/Dumper/$p.pm"}
115 12 0 unless ($yes)
123 4 0 unless wantarray
139 0 11 unless (ref $self)
145 6 5 unless ($$state{'pages'})
153 6 4 if exists $$p{'name'}
166 10 6 if $$data{'fields'}
189 11 10 if ($$master{'maxdepth'} == 4)
192 0 21 if $$master{'__fields'}
204 180 109 unless $r
206 0 109 if $$parent{'depth'} > 2
212 53 56 if ($r eq 'ARRAY') { }
56 0 elsif ($r eq 'HASH') { }
222 18 91 if $$state{'__fields'}
240 7 11 unless ('ARRAY' eq ref $data)
242 4 3 if ($$state{'data'}[0]{'name'}) { }
263 7 11 if $first_name
273 32 77 if ($$state{'depth'} > $$parent{'maxdepth'})
277 32 77 if ($$state{'maxdepth'} > $$parent{'maxdepth'})
293 95 53 if (@{$$state{'data'};}) { }
25 28 elsif (ref $sub) { }
295 0 95 if not $err and ref $$state{'data'}[0] and ref $$state{'data'}[0]{'data'} ne ref $$sub{'data'}
300 0 95 if ($err)
318 0 56 if ($$parent{'fields'})
328 84 36 if (not ref $sub) { }
26 10 elsif ($$sub{'maxdepth'} == 3) { }
337 10 0 if ($r eq 'ARRAY') { }
0 0 elsif ($r eq 'HASH') { }
344 18 102 if (0 == @{$$state{'data'};} and ref $sub)