Branch Coverage

blib/lib/XML/EP/Processor/EmbPerl.pm
Criterion Covered Total %
branch 0 36 0.0


line true false branch
11 0 0 @_ == 1 ? :
18 0 0 unless $$req{'path'}
26 0 0 $$req{'embperl_basedir'} || exists $ENV{'DOCUMENT_ROOT'} ? :
31 0 0 if ($exists and (stat _)[9] >= $$req{'path_mtime'}) { }
39 0 0 if (open FH, ">$basefile~" and print FH $source and close FH)
44 0 0 if $@
78 0 0 if ($type == XML::DOM::ELEMENT_NODE()) { }
0 0 elsif ($type == XML::DOM::TEXT_NODE()) { }
0 0 elsif ($type == XML::DOM::CDATA_SECTION_NODE()) { }
0 0 elsif ($type == XML::DOM::PROCESSING_INSTRUCTION_NODE()) { }
0 0 elsif ($type == XML::DOM::COMMENT_NODE()) { }
0 0 elsif ($type == XML::DOM::DOCUMENT_NODE()) { }
0 0 elsif ($type == XML::DOM::DOCUMENT_TYPE_NODE()) { }
0 0 elsif ($type == XML::DOM::NOTATION_NODE()) { }
84 0 0 if (my $attr = $node->getAttributes)
107 0 0 if ($prefix ne '')
111 0 0 if ($plus_text) { }
118 0 0 $text eq '' ? :