Branch Coverage

blib/lib/XML/Perl.pm
Criterion Covered Total %
branch 56 70 80.0


line true false branch
18 2 0 unless defined $i
19 2 0 unless defined $s
20 2 0 unless defined $nl
21 2 0 if (ref $d eq 'HASH') { }
35 16 8 if (ref $v eq 'HASH') { }
3 5 elsif (ref $v eq 'ARRAY') { }
40 14 18 if ($_k =~ /^@/) { }
6 12 elsif ($_k eq '') { }
48 13 3 @attrs ? :
49 4 12 if (keys %nodes) { }
6 6 elsif ($value) { }
56 0 6 if (ref $value eq 'ARRAY') { }
2 4 elsif (ref $value eq 'HASH') { }
98 6 14 if ($k) { }
102 10 4 if ($i eq '<') { }
4 0 elsif ($i eq '
0 0 elsif ($i eq '
107 1 3 if ($last eq $j) { }
121 1 0 if defined $xml
162 14 24 unless ($text =~ /^\s*$/s)
163 14 0 if @p > 1
171 0 20 unless @p > 1
173 0 20 if (ref $v eq 'HASH' and keys %$v == 0 or $v eq '')
180 2 0 if defined $xml
190 1 1 unless defined $i
191 1 1 unless defined $s
192 1 1 unless defined $nl
207 3 9 if (ref $v) { }
9 0 elsif (defined $v and $v ne '') { }
227 5 1 if ($path[0] eq '') { }
239 11 2 if (ref $tree eq 'HASH' and $tree->{$k}) { }
241 3 8 if ($i) { }
247 10 1 wantarray ? :
256 1 13 if (@path == 1 and $path[0] =~ /^\@(.+)$/) { }
5 8 elsif (@path) { }