| line |
true |
false |
branch |
|
28
|
12 |
0 |
unless defined $HTML::Element::Tiny::HAS{$module} |
|
59
|
498 |
0 |
if (exists ${$class . '::';}{'TAG_CLASS'} and *{${$class . '::';}{'TAG_CLASS'};}{'HASH'}) { } |
|
71
|
212 |
573 |
if ($tag_class = $$href{$tag}) |
|
83
|
211 |
287 |
unless (ref $arg) |
|
86
|
0 |
287 |
unless @$arg |
|
88
|
11 |
276 |
ref $$arg[0] eq 'HASH' ? : |
|
89
|
272 |
15 |
if $extra |
|
97
|
272 |
15 |
if $$self[3]{-'parent'} |
|
145
|
7 |
80 |
unless defined(my $next = $iter->next) |
|
146
|
68 |
12 |
unless $next->_match($spec) |
|
155
|
0 |
5 |
if defined $_ |
|
|
0 |
5 |
grep({length $_ if defined $_;} $$spec{'id'}) ? : |
|
164
|
0 |
6 |
unless ($elem) |
|
167
|
0 |
6 |
if (my $next = $iter->next) |
|
186
|
8 |
95 |
unless @queue |
|
195
|
12 |
35 |
if (ref $arg eq 'HASH') { } |
|
|
35 |
0 |
elsif (not ref $arg) { } |
|
197
|
5 |
7 |
if ($k eq 'id') { } |
|
|
1 |
6 |
elsif ($k eq 'class') { } |
|
203
|
16 |
19 |
if $arg eq 'id' |
|
204
|
13 |
6 |
if $arg eq 'class' |
|
214
|
0 |
0 |
if $extra and %$extra |
|
222
|
1 |
250 |
unless $extra |
|
238
|
250 |
0 |
if $$clone[3]{-'parent'} |
|
245
|
250 |
188 |
$_->parent ? : |
|
|
438 |
1 |
&Scalar::Util::blessed($_) ? : |
|
268
|
3 |
1 |
if (&Scalar::Util::blessed($_)) { } |
|
278
|
4 |
1 |
if ($idx{$i} or $obj{&Scalar::Util::refaddr($child)}) { } |
|
295
|
5 |
7 |
if defined $val and $_ ne 'class' || length $val |
|
302
|
2 |
8 |
if ($HTML::Element::Tiny::DEFAULT_CLOSED{$$self[0]}) { } |
|
308
|
0 |
10 |
if $HTML::Element::Tiny::DEFAULT_NEWLINE{$$self[0]} |
|
331
|
187 |
0 |
ref $_[1] ? : |
|
345
|
0 |
5 |
if $HTML::Element::Tiny::HAS_HTML_ENTITIES |
|
361
|
2 |
23 |
wantarray ? : |
|
374
|
2 |
1 |
unless @$self == 1 |
|
401
|
0 |
0 |
if defined $_ |
|
402
|
1 |
0 |
ref $arg ? : |