line |
true |
false |
branch |
17
|
0 |
0 |
if defined $args{'debug'} |
23
|
0 |
0 |
if ($debug) |
52
|
0 |
0 |
if $e =~ s/(\d+);/chr $1;/egu |
53
|
0 |
0 |
if $e =~ s/(x[0-9a-f]+);/chr hex $1;/egiu |
54
|
0 |
0 |
if $e =~ s/&(lt|gt|quot|apos|amp);/$emap{$1};/egu |
55
|
0 |
0 |
if $e =~ /(&[^;]{0,10})/u |
60
|
0 |
0 |
unless defined $data and $data =~ /\S/u |
63
|
0 |
0 |
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 |
$1 eq '&' ? : |
82
|
0 |
0 |
if $_ |
|
0 |
0 |
if $data =~ /]]>/u or $data =~ //su or grep {/--/u if $_;} $data =~ /^\s+||\s+$/gsu |
93
|
0 |
0 |
if ($params{'fatal_declarations'} and $data =~ /
|
98
|
0 |
0 |
if ($data =~ /\
|
106
|
0 |
0 |
if $token =~ /^\s+$/su and not $whitespace_tokens |
107
|
0 |
0 |
if $token =~ /<\?$re_name.*?\?>/isu or $token =~ /^
|
110
|
0 |
0 |
if ($token =~ m[^($re_name)\s*>]iu) { } |
|
0 |
0 |
elsif ($token =~ m[^<$re_name(\s[^>]*)*(\s*/)?>]isu) { } |
|
0 |
0 |
elsif ($token =~ /^
|
112
|
0 |
0 |
if $elem->{'name'} ne $1 |
124
|
0 |
0 |
if (@{$attrib;} == 2 * keys(%{+{@{$attrib;}};})) { } |
136
|
0 |
0 |
if $attribs_raw =~ /\S/u or grep {/
|
138
|
0 |
0 |
unless ($params{'no_entity_parsing'}) |
154
|
0 |
0 |
if ($token =~ m[\s*/>$]u) |
164
|
0 |
0 |
unless ($params{'no_entity_parsing'}) |
172
|
0 |
0 |
if exists $elem->{'parent'} |
174
|
0 |
0 |
if ($whitespace_tokens) |
191
|
0 |
0 |
if @{$elem->{'content'};} > 1 |
193
|
0 |
0 |
if @{$elem->{'content'};} == 0 or $elem->{'content'}[0]{'type'} ne "e" |