| line |
true |
false |
branch |
|
17
|
0 |
32 |
if defined $args{'debug'} |
|
23
|
0 |
35 |
if ($debug) |
|
52
|
2 |
850 |
if $e =~ s/&#(\d+);/chr $1;/egu |
|
53
|
2 |
848 |
if $e =~ s/&#(x[0-9a-f]+);/chr hex $1;/egiu |
|
54
|
1 |
847 |
if $e =~ s/&(lt|gt|quot|apos|amp);/$emap{$1};/egu |
|
55
|
2 |
845 |
if $e =~ /(&[^;]{0,10})/u |
|
60
|
0 |
43 |
unless defined $data and $data =~ /\S/u |
|
63
|
0 |
43 |
if $data =~ /[\x00-\x08\x0b\x0c\x0e-\x1f]/u |
|
70
|
0 |
0 |
$1 eq q['] ? : |
|
|
0 |
0 |
$1 eq '"' ? : |
|
|
0 |
0 |
$1 eq '<' ? : |
|
|
0 |
0 |
if ($1 eq '&') { } |
|
82
|
6 |
36 |
if $_ |
|
|
0 |
43 |
if $data =~ /]]>/u or $data =~ //su or grep {/--/u if $_;} $data =~ /^\s+||\s+$/gsu |
|
93
|
0 |
43 |
if ($params{'fatal_declarations'} and $data =~ /
|
|
98
|
0 |
43 |
if ($data =~ /\
|
|
106
|
9 |
519 |
if $token =~ /^\s+$/su and not $whitespace_tokens |
|
107
|
6 |
513 |
if $token =~ /<\?$re_name.*?\?>/isu or $token =~ /^
|
|
110
|
90 |
423 |
if ($token =~ m[^]iu) { } |
|
|
190 |
233 |
elsif ($token =~ m[^<$re_name(\s[^>]*)*(\s*/)?>]isu) { } |
|
|
0 |
233 |
elsif ($token =~ /^
|
|
112
|
0 |
90 |
if $elem->{'name'} ne $1 |
|
124
|
190 |
0 |
if (@{$attrib;} == 2 * keys(%{+{@{$attrib;}};})) { } |
|
136
|
0 |
190 |
if $attribs_raw =~ /\S/u or grep {/
|
|
138
|
189 |
1 |
unless ($params{'no_entity_parsing'}) |
|
154
|
98 |
92 |
if ($token =~ m[\s*/>$]u) |
|
164
|
232 |
1 |
unless ($params{'no_entity_parsing'}) |
|
172
|
0 |
41 |
if exists $elem->{'parent'} |
|
174
|
33 |
8 |
if ($whitespace_tokens) |
|
191
|
0 |
41 |
if @{$elem->{'content'};} > 1 |
|
193
|
0 |
41 |
if @{$elem->{'content'};} == 0 or $elem->{'content'}[0]{'type'} ne "e" |