Branch Coverage

blib/lib/Data/Sofu/SofuML.pm
Criterion Covered Total %
branch 47 150 31.3


line true false branch
106 36 16 if $data eq ' '
256 8 60 if ($data->hasComment)
274 60 8 unless $$self{'COMMENT'}{$tree}
275 0 8 unless ref $$self{'COMMENT'}{$tree}
276 0 8 unless ref $$self{'COMMENT'}{$tree} eq 'ARRAY'
357 0 66 unless $r and $r =~ /Data::Sofu/ and $r->isa('Data::Sofu::Object')
360 10 56 if ($data->isReference and $data->valid)
363 0 66 if ($data->isReference)
367 10 56 if ($$self{'IDS'}{$data})
372 36 20 if ($data->isValue)
373 34 2 if $data->toString ne ''
376 6 14 if ($data->isMap)
385 12 2 if ($data->isList)
407 22 44 if (ref $data)
408 4 18 if ($$self{'IDS'}{$data})
412 6 12 if (ref $data eq 'HASH')
421 12 0 if (ref $data eq 'ARRAY') { }
433 42 2 if (defined $data)
434 40 2 if $data ne ''
453 2 0 unless $level
455 0 2 unless $r and $r =~ /Data::Sofu/ and $r->isa('Data::Sofu::Object')
456 0 2 unless ($data->isMap)
466 2 0 unless $header
467 0 2 if $header
507 2 2 unless defined $comments
508 2 2 if $r and $r =~ /Data::Sofu::/ and $data->isa('Data::Sofu::Object')
510 0 2 unless ref $data and ref $data eq 'HASH'
511 0 2 unless ref $data and ref $data eq 'HASH'
515 2 0 unless $level
521 2 0 unless $header
522 0 2 if $header
566 0 0 if $@
576 0 0 if $id{$target}
579 0 0 if wantarray
606 0 0 if $@
616 0 0 if $id{$target}
640 0 0 if $k eq 'id'
641 0 0 if $k eq 'idref'
642 0 0 if $k eq 'key'
644 0 0 if ($tag eq 'value') { }
0 0 elsif ($tag eq 'undefined') { }
0 0 elsif ($tag eq 'reference') { }
0 0 elsif ($tag eq 'sofu') { }
0 0 elsif ($tag eq 'map') { }
0 0 elsif ($tag eq 'list') { }
0 0 elsif ($tag eq 'element') { }
688 0 0 unless ref $tree[-1] or not defined $tree[-1]
703 0 0 if $end
705 0 0 if $tree
706 0 0 unless $tree
708 0 0 if $end
721 0 0 if ($tag eq 'element')
724 0 0 if (ref $ret and ref $ret eq 'SCALAR')
730 0 0 unless ref $ret or not defined $ret
731 0 0 if $tag eq 'list'
733 0 0 if ($tree[-1] and ref $tree[-1] and ref $tree[-1] eq 'ARRAY')
735 0 0 if (ref $ret and ref $ret eq 'SCALAR')
761 0 0 if $k eq 'id'
762 0 0 if $k eq 'idref'
763 0 0 if $k eq 'key'
765 0 0 if ($tag eq 'value') { }
0 0 elsif ($tag eq 'undefined') { }
0 0 elsif ($tag eq 'reference') { }
0 0 elsif ($tag eq 'sofu') { }
0 0 elsif ($tag eq 'map') { }
0 0 elsif ($tag eq 'list') { }
0 0 elsif ($tag eq 'element') { }
813 0 0 if $tree[-1] and $tree[-1]->isValue
828 0 0 if ($end or $elem) { }
829 0 0 if $ret
832 0 0 if $tree[-1]
847 0 0 if ($tag eq 'element')
854 0 0 if $ret->isValue
855 0 0 if $tag eq 'list'
857 0 0 if ($tree[-1] and $tree[-1]->isList)