Branch Coverage

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


line true false branch
60 542 201 if ($key =~ /^-/)
61 4 538 if ($key eq '-href')
63 0 4 if $attrs{'-type'}
64 0 4 if $attrs{'-role'}
65 2 2 if $attrs{'-title'}
66 1 3 if $attrs{'-show'}
68 0 4 if $attrs{'-arcrole'}
70 1 3 if $attrs{'-actuate'}
86 79 5 if $key =~ /^-/
87 0 5 if (ref($self->{$key}) =~ /^SVG/)
104 1432 275 if ($k =~ /^-/)
105 0 275 if (ref $self->{$k} eq 'ARRAY') { }
5 270 elsif (ref $self->{$k} eq 'HASH') { }
270 0 elsif (ref $self->{$k} eq '') { }
117 22 108 if ($self->{'-comment'}) { }
23 85 elsif ($self->{'-name'} eq 'document') { }
124 21 2 unless $self->{'-inline'}
127 2 21 if $self->{'-document'}{'-pi'}
130 21 2 unless $self->{'-inline'}
134 23 0 if (ref($k) =~ /^SVG::Element/)
145 49 36 if (defined $self->{'-childs'} or $is_cdataish) { }
147 47 2 unless $self->{'-inline'} and $self->{'-name'}
152 70 0 if (ref($k) =~ /^SVG::Element/)
157 12 37 if (defined $self->{'-cdata'})
160 3 46 if (defined $self->{'-CDATA'})
163 1 48 if (defined $self->{'-cdata_noxmlesc'})
169 33 16 unless ($is_cdataish)
192 0 0 if $k =~ /^-/
193 0 0 if (ref $self->{$k} eq 'ARRAY') { }
0 0 elsif (ref $self->{$k} eq 'HASH') { }
0 0 elsif (ref $self->{$k} eq '') { }
204 0 0 if ($self->{'-comment'}) { }
0 0 elsif ($self->{'-pi'}) { }
0 0 elsif ($self->{'-name'} eq 'document') { }
219 0 0 if (ref($k) =~ /^SVG::Element/)
226 0 0 if (defined $self->{'-childs'}) { }
233 0 0 if ($self->{'-cdata'}) { }
0 0 elsif ($self->{'-CDATA'}) { }
0 0 elsif ($self->{'-cdata_noxmlesc'}) { }
245 0 0 if (ref($k) =~ /^SVG::Element/)
273 102 22 unless ($self->{'-parent'})
281 0 124 if $attrs{'-namespace'}
289 33 91 unless defined $tag->{'-docref'}{'-idlist'}
293 13 111 if ($tag->{'id'})
294 2 11 if ($self->getElementByID($tag->{'id'}))
301 11 111 if (defined $tag->{'id'})
307 33 89 unless defined $tag->{'-docref'}{'-elist'}
311 98 24 unless defined $tag->{'-docref'}{'-elist'}{$tag->{'-name'}}
343 32 1 unless $svg->{'height'}
344 32 1 unless $svg->{'width'}
363 0 0 if defined $attrs{'-href'}
379 0 20 if defined $attrs{'-href'}
380 0 20 if defined $attrs{'-target'}
393 2 2 unless scalar @text
395 1 1 if $self->{'-document'}{'-pi'}
396 1 1 if @pi
419 0 1 if (lc $type eq 'path') { }
1 0 elsif (lc($type) =~ /^poly/) { }
422 0 0 if defined $attrs{'-relative'} and lc $attrs{'-relative'}
434 0 0 if defined $attrs{'-relative'} and lc $attrs{'-relative'}
437 0 0 if defined $attrs{'-closed'} and lc $attrs{'-closed'}
508 0 0 if $k =~ /\-/
510 0 0 unless ($legal{$name} =~ /\b$k\b/)
549 0 3 if ($name eq 'id')
550 0 0 if ($self->getElementByID($val))
556 2 1 if (not defined $val) { }
557 2 0 if (scalar @_ == 2) { }
605 0 1 unless $attrs{'-type'}
660 0 0 unless ($type =~ /^(linear|radial)$/)
674 1 11 if ($self->{'-docref'}{'-raiseerror'}) { }
0 11 elsif ($self->{'-docref'}{'-printerror'}) { }
689 9 1289 if ($sub eq 'DESTROY') { }
703 1142 147 unless ($package->can($sub))
709 7 1282 if $self