Branch Coverage

blib/lib/XML/XPathScript/Processor.pm
Criterion Covered Total %
branch 0 164 0.0


line true false branch
98 0 0 unless my $class = ref($$self{'dom'} = $dom)
101 0 0 if ($class =~ /((?:XML::)(?:LibXML|XPath))/) { }
0 0 elsif ($class =~ /B::XPath/) { }
119 0 0 if ($parser eq 'XML::LibXML') { }
0 0 elsif ($parser eq 'XML::XPath') { }
0 0 elsif ($parser eq 'B::XPath') { }
156 0 0 unless $self
159 0 0 unless ref $self
180 0 0 $export =~ s/^(\W)// ? :
195 0 0 $type eq '*' ? :
0 0 $type eq '%' ? :
0 0 $type eq '@' ? :
0 0 $type eq '$' ? :
0 0 $type eq '&' ? :
205 0 0 if ($$self{'parser'} eq 'XML::XPath')
210 0 0 unless defined $context
216 0 0 if ($$self{'parser'} eq 'XML::XPath')
221 0 0 unless defined $context
230 0 0 unless ref $blob
234 0 0 $blob->can('value') ? :
0 0 $blob->can('data') ? :
260 0 0 if $@
266 0 0 ref $_[-1] eq 'HASH' ? :
269 0 0 unless @_
271 0 0 unless (ref $_[0])
275 0 0 unless @_
281 0 0 $self->is_nodelist($_[0]) ? :
290 0 0 if (defined(my $sub = $$template{'testcode'})) { }
0 0 elsif (exists $$t{'prechild'} or exists $$t{'prechildren'} or exists $$t{'postchild'} or exists $$t{'postchildren'}) { }
325 0 0 if ($charlength == 3) { }
0 0 elsif ($charlength == 4 and $bytelength == 4) { }
0 0 elsif ($charlength == 4 and $bytelength == 6) { }
347 0 0 if $node->isa('XML::XPath::Node::Element') and not $self->isa('XML::XPath::Node::ElementImpl') and $node =~ /SCALAR/
351 0 0 $node->can('parentNode') ? :
355 0 0 unless defined $parent
358 0 0 if ($self->is_element_node($node)) { }
0 0 elsif ($self->is_text_node($node)) { }
0 0 elsif ($self->is_comment_node($node)) { }
0 0 elsif ($self->is_pi_node($node)) { }
372 0 0 $_->isa('XML::XPath::Node::Element') ? :
376 0 0 if ($self->is_element_node($node) and my $id = $self->findvalue('@id', $node))
383 0 0 $node =~ /SCALAR/ ? :
387 0 0 $brothers[$i] =~ /SCALAR/ ? :
389 0 0 if $theself eq $thebrother
409 0 0 if ($node->getParentNode->getParentNode) { }
0 0 $self->is_pi_node($node) ? :
0 0 $self->is_comment_node($node) ? :
0 0 $self->is_text_node($node) ? :
0 0 $self->is_element_node($node) ? :
415 0 0 if ($$self{'binmode'} and $self->is_utf8_tainted($retval))
436 0 0 unless $trans
442 0 0 if (my $code = $$trans{'testcode'})
448 0 0 if defined $action and $action == 0
451 0 0 if defined $action and $action == 2
472 0 0 unless ($trans)
487 0 0 if (my $content = $$trans{'content'} || $$trans{'contents'})
497 0 0 if ($$trans{'testcode'})
502 0 0 if $action =~ /^-?\d+$/ and $action == 0
504 0 0 if (defined $action and not $action =~ /^-?\d+/) { }
0 0 elsif ($action == -1) { }
513 0 0 $search ? :
0 0 $dokids ? :
521 0 0 if $$t{'showtag'}
523 0 0 if @kids
526 0 0 if @kids
528 0 0 if $$t{'showtag'}
537 0 0 if $kid_is_element
542 0 0 if $kid_is_element
554 0 0 if ref $content eq 'CODE'
560 0 0 unless open STDOUT, '>', \$output
576 0 0 if $@
587 0 0 unless $tag
589 0 0 if ref $tag eq 'CODE'
602 0 0 unless $trans
611 0 0 if (my $code = $$trans{'testcode'})
614 0 0 if ($action and %$t)
622 0 0 if $action =~ /^-?\d+$/ and $action == $DO_NOT_PROCESS
624 0 0 if $action == $DO_SELF_ONLY
635 0 0 unless $name ||= $self->get_node_name($node)
640 0 0 if ($$self{'parser'} eq 'XML::XPath')
656 0 0 if (my $name = $_[1] || $self->get_node_name($_[0]))
667 0 0 unless defined $string and $$self{'is_interpolating'}