Branch Coverage

blib/lib/SVG/Element.pm
Criterion Covered Total %
branch 89 148 60.1


line true false branch
56 542 201 if ($key =~ /^-/)
57 4 538 if ($key eq "-href")
59 0 4 if $attrs{'-type'}
60 0 4 if $attrs{'-role'}
61 2 2 if $attrs{'-title'}
62 1 3 if $attrs{'-show'}
64 0 4 if $attrs{'-arcrole'}
66 1 3 if $attrs{'-actuate'}
82 79 5 if $key =~ /^-/
83 0 5 if (ref($self->{$key}) =~ /^SVG/)
100 1432 275 if ($k =~ /^-/)
101 0 275 if (ref $self->{$k} eq 'ARRAY') { }
5 270 elsif (ref $self->{$k} eq 'HASH') { }
270 0 elsif (ref $self->{$k} eq '') { }
113 22 108 if ($self->{'-comment'}) { }
23 85 elsif ($self->{'-name'} eq 'document') { }
120 21 2 unless $self->{'-inline'}
123 2 21 if $self->{'-document'}{'-pi'}
126 21 2 unless $self->{'-inline'}
130 23 0 if (ref($k) =~ /^SVG::Element/)
141 49 36 if (defined $self->{'-childs'} or $is_cdataish) { }
143 47 2 unless $self->{'-inline'} and $self->{'-name'}
148 70 0 if (ref($k) =~ /^SVG::Element/)
153 12 37 if (defined $self->{'-cdata'})
156 3 46 if (defined $self->{'-CDATA'})
159 1 48 if (defined $self->{'-cdata_noxmlesc'})
165 33 16 unless ($is_cdataish)
188 0 0 if $k =~ /^-/
189 0 0 if (ref $self->{$k} eq 'ARRAY') { }
0 0 elsif (ref $self->{$k} eq 'HASH') { }
0 0 elsif (ref $self->{$k} eq '') { }
200 0 0 if ($self->{'-comment'}) { }
0 0 elsif ($self->{'-pi'}) { }
0 0 elsif ($self->{'-name'} eq 'document') { }
215 0 0 if (ref($k) =~ /^SVG::Element/)
222 0 0 if (defined $self->{'-childs'}) { }
229 0 0 if ($self->{'-cdata'}) { }
0 0 elsif ($self->{'-CDATA'}) { }
0 0 elsif ($self->{'-cdata_noxmlesc'}) { }
241 0 0 if (ref($k) =~ /^SVG::Element/)
269 102 22 unless ($self->{'-parent'})
277 0 124 if $attrs{'-namespace'}
285 33 91 unless defined $tag->{'-docref'}{'-idlist'}
289 13 111 if ($tag->{'id'})
290 2 11 if ($self->getElementByID($tag->{'id'}))
297 11 111 if (defined $tag->{'id'})
303 33 89 unless defined $tag->{'-docref'}{'-elist'}
307 98 24 unless defined $tag->{'-docref'}{'-elist'}{$tag->{'-name'}}
339 32 1 unless $svg->{'height'}
340 32 1 unless $svg->{'width'}
359 0 0 if defined $attrs{'-href'}
375 0 20 if defined $attrs{'-href'}
376 0 20 if defined $attrs{'-target'}
389 2 2 unless scalar @text
391 1 1 if $self->{'-document'}{'-pi'}
392 1 1 if @pi
415 0 1 if (lc $type eq 'path') { }
1 0 elsif (lc($type) =~ /^poly/) { }
418 0 0 if defined $attrs{'-relative'} and lc $attrs{'-relative'}
430 0 0 if defined $attrs{'-relative'} and lc $attrs{'-relative'}
433 0 0 if defined $attrs{'-closed'} and lc $attrs{'-closed'}
504 0 0 if $k =~ /\-/
506 0 0 unless ($legal{$name} =~ /\b$k\b/)
545 0 3 if ($name eq "id")
546 0 0 if ($self->getElementByID($val))
552 2 1 if (not defined $val) { }
553 2 0 if (scalar @_ == 2) { }
601 0 1 unless $attrs{'-type'}
656 0 0 unless ($type =~ /^(linear|radial)$/)
670 1 11 if ($self->{'-docref'}{'-raiseerror'}) { }
0 11 elsif ($self->{'-docref'}{'-printerror'}) { }
685 9 1289 if ($sub eq 'DESTROY') { }
699 1142 147 unless ($package->can($sub))
705 7 1282 if $self