line |
true |
false |
branch |
55
|
0 |
5 |
ref $_[0] eq 'TUWF::XML' ? : |
56
|
1 |
4 |
$htmlbool{$le} && $#_ % 2 ? : |
106
|
0 |
1 |
if $o{'default'} |
115
|
0 |
0 |
$c ? : |
123
|
0 |
7 |
unless (defined $_) |
151
|
8 |
0 |
ref $_[0] eq 'TUWF::XML' ? : |
161
|
0 |
0 |
ref $_[0] eq 'TUWF::XML' ? : |
182
|
5 |
0 |
ref $_[0] eq 'TUWF::XML' ? : |
184
|
0 |
5 |
if not $name or $name =~ /^[^a-z]/i or $name =~ / / |
186
|
5 |
0 |
$s->{'pretty'} ? : |
192
|
2 |
6 |
unless defined $val |
193
|
0 |
6 |
if $attr =~ /[\s'"&<>=]/ |
194
|
2 |
4 |
if ($attr =~ /^\+(.+)/) { } |
195
|
1 |
1 |
length $concat{$1} ? : |
202
|
1 |
4 |
if (not @_) { } |
|
1 |
3 |
elsif (not defined $_[0]) { } |
|
1 |
2 |
elsif (ref $_[0] eq 'CODE') { } |
225
|
0 |
1 |
ref $_[0] eq 'TUWF::XML' ? : |
229
|
0 |
1 |
unless $l |
230
|
0 |
1 |
if $w and $w ne $l |
231
|
1 |
0 |
if $s->{'pretty'} |
240
|
0 |
0 |
ref $_[0] eq 'TUWF::XML' ? : |
249
|
0 |
0 |
$lang ? : |
|
0 |
0 |
$lang ? : |
|
0 |
0 |
$doctype eq 'html5' ? : |
|
0 |
0 |
$hascontent ? : |
269
|
0 |
0 |
ref $_[0] eq 'TUWF::XML' ? : |