| line |
true |
false |
branch |
|
50
|
0 |
36 |
if (@_) |
|
79
|
0 |
1358 |
unless defined $tag and length $tag |
|
80
|
0 |
1358 |
if $tag =~ m[[<>/\x00-\x20]] |
|
85
|
0 |
637 |
unless defined $val |
|
88
|
52 |
1306 |
if ($tag eq 'html') |
|
100
|
16 |
20 |
if ($html =~ m[^\s*.*\s*\z]is) |
|
106
|
22 |
11 |
if (ref $_) |
|
|
1 |
19 |
unless $$dom{'_body'}{'_content'} |
|
111
|
12 |
8 |
wantarray ? : |
|
116
|
0 |
1 |
unless $tag =~ /^\w+$/ |
|
141
|
1 |
14 |
if $$self{'_tag'} eq '~comment' |
|
143
|
1 |
13 |
if (@_) |
|
150
|
0 |
13 |
unless $$self{'_content'} |
|
162
|
4669 |
565 |
unless $$_{'_tag'} eq $tag |
|
163
|
114 |
41 |
if @$found and $$found[0] == $self |
|
170
|
18 |
314 |
if $$_{'id'} |
|
171
|
0 |
7 |
wantarray ? : |
|
175
|
1 |
198 |
$_[0]{'_tag'} eq '~comment' ? : |
|
179
|
1 |
259 |
if $_[0]{'_tag'} eq '~comment' |
|
184
|
1 |
4 |
if $_[0]{'_tag'} eq '~comment' |
|
190
|
1 |
1 |
if $$self{'_tag'} eq '~comment' |
|
209
|
1 |
2 |
if $$self{'_tag'} eq '~comment' |
|
210
|
1 |
1 |
scalar grep(/^[a-z0-9]/, keys %$self) ? : |
|
214
|
1 |
90 |
if ($_[1]) |
|
218
|
9 |
81 |
defined $className ? : |
|
228
|
0 |
2 |
unless $_[0]{'_content'} |
|
232
|
3 |
2 |
unless $_[0]{'_content'} |
|
237
|
0 |
1 |
unless $_[0]{'_content'} |
|
242
|
0 |
13 |
unless my $content = $_[0]{'_content'} |
|
244
|
13 |
13 |
if ref $$content[$i] |
|
250
|
0 |
46 |
unless my $content = $_[0]{'_content'} |
|
252
|
46 |
46 |
if ref $$content[$i] |
|
259
|
0 |
2 |
unless defined $elem |
|
270
|
0 |
96 |
unless my $content = $_[0]->parentNode->{'_content'} |
|
273
|
81 |
776 |
if $found and ref $$content[$i] |
|
274
|
96 |
680 |
if ref $$content[$i] and $$content[$i] == $_[0] |
|
280
|
0 |
1 |
unless my $content = $_[0]->parentNode->{'_content'} |
|
283
|
0 |
3 |
if $found and ref $$content[$i] |
|
284
|
1 |
2 |
if ref $$content[$i] and $$content[$i] == $_[0] |
|
316
|
80 |
45 |
unless (ref $elem) |
|
320
|
2 |
43 |
if ($$elem{'_tag'} eq '~comment') |
|
325
|
3 |
40 |
if $$elem{'id'} |
|
327
|
2 |
41 |
if $$elem{'class'} |
|
330
|
141 |
14 |
if /^(_|id$|class$)/i |
|
334
|
0 |
43 |
if (exists $selfclose{$$elem{'_tag'}}) { } |
|
341
|
3 |
40 |
unless $$elem{'_content'} |
|
352
|
2322 |
3244 |
if (&$test()) |
|
356
|
262 |
5304 |
unless $$elem{'_content'} |