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 |