Branch Coverage

blib/lib/HTML/DOM/Node.pm
Criterion Covered Total %
branch 74 80 92.5


line true false branch
141 0 3 if (@_ > 1)
152 3057 1872 defined $p ? :
156 52 23 wantarray ? :
170 1 1 defined $sib ? :
175 7 7 defined $sib ? :
182 478 8810 unless ($self->{'_HTML_DOM_Node_owner'})
240 1 14 if $self->is_inside($new_node)
248 7 7 if ($before) { }
250 6 3 if $kids[$_] == $before
262 6 7 if $old_parent
265 4 9 if ($was_inside_doc)
270 1 12 $new_node->isa('HTML::DOM::DocumentFragment') ? :
278 6 7 if ($self->is_inside($doc))
280 0 31 if (not $was_inside_doc and my $sub = $doc->elem_handler(lc $_->tag))
305 1 17 if $self->is_inside($new_node)
312 1 16 unless $self == $old_node->parent
319 9 7 if ($in_doc)
324 6 10 if $old_parent
326 3 13 if ($new_node->is_inside($doc) and not $new_node->is_inside($old_node))
336 1 15 $new_node->isa('HTML::DOM::DocumentFragment') ? :
345 9 7 if ($in_doc)
347 0 65 if (my $sub = $doc->elem_handler(lc $_->tag))
368 1 29 unless $self == $child->parent
379 24 5 if ($child->is_inside($doc))
401 1 137 if $self->is_inside($new_node)
408 7 130 if $old_parent
411 5 132 if ($was_inside_doc)
417 1 136 $new_node->isa('HTML::DOM::DocumentFragment') ? :
424 30 107 if ($self->is_inside($doc))
426 1 59 if (not $was_inside_doc and my $sub = $doc->elem_handler(lc $_->tag))
450 147 19 unless defined $node1
451 8 11 if $node1->root != $node2->root
459 3 8 length $addr1 < length $addr2 ? :
469 7 6 if ($deep) { }
486 9 2 if ($pile[0]{'_tag'} eq '~text') { }
487 3 6 if ($pile[0]{'text'} eq '')
498 0 2 unless shift(@pile)->{'_content'}
555 6 1696 unless @_
593 0 247 unless ref $_
604 65 0 if ref $_