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 |