line |
true |
false |
branch |
173
|
221 |
2 |
if (ref $arg eq '') { } |
174
|
29 |
192 |
if ($arg =~ /^_TINY_XML_STRING_/) { } |
178
|
1 |
191 |
unless open FH, $arg |
187
|
2 |
220 |
if not defined $file or $file =~ /^\s*$/ |
190
|
6 |
214 |
if $file =~ /[\x00-\x08\x0b\x0c\x0e-\x1f]/ |
196
|
1 |
1 |
$1 eq q['] ? : |
|
0 |
2 |
$1 eq '"' ? : |
|
1 |
2 |
$1 eq '<' ? : |
|
2 |
3 |
$1 eq '&' ? : |
208
|
6 |
170 |
if $_ |
|
2 |
204 |
if $file =~ /]]>/ or $file =~ //s or grep {/--/ if $_;} $file =~ /^\s+||\s+$/gs |
219
|
111 |
93 |
if ($params{'fatal_declarations'} and $file =~ /
|
224
|
688 |
236 |
if length $_ |
226
|
6 |
527 |
if ($token =~ /<\?$regexps{'name'}.*?\?>/is or $token =~ /^
|
|
168 |
359 |
elsif ($token =~ m[^($regexps{'name'})\s*>]i) { } |
|
241 |
118 |
elsif ($token =~ m[^<$regexps{'name'}(\s[^>]*)*(\s*/)?>]is) { } |
|
13 |
105 |
elsif ($token =~ /^) { } |
232
|
3 |
165 |
if $elem->{'name'} ne $1 |
242
|
240 |
1 |
if (@{$attrib;} == 2 * keys(%{+{@{$attrib;}};})) { } |
250
|
12 |
228 |
if $attribs_raw =~ /\S/ or grep {/;} values %{$attrib;} |
252
|
227 |
1 |
unless ($params{'no_entity_parsing'}) |
266
|
33 |
191 |
if ($token =~ m[\s*/>$]) |
274
|
104 |
1 |
unless ($params{'no_entity_parsing'}) |
278
|
0 |
52 |
if exists $elem->{'parent'} |
279
|
12 |
40 |
if $#{$$elem{'content'};} > 0 |
281
|
1 |
39 |
if $#{$$elem{'content'};} == -1 or $elem->{'content'}[0]{'type'} ne 'e' |
289
|
22 |
153 |
$strict_entity_parsing ? : |
291
|
2 |
5 |
substr($3, 0, 1) eq 'x' ? : |
|
7 |
12 |
$1 eq 'amp;' ? : |
|
19 |
19 |
$1 eq 'quot;' ? : |
|
2 |
38 |
$1 eq 'apos;' ? : |
|
89 |
40 |
$1 eq 'gt;' ? : |
|
84 |
129 |
$1 eq 'lt;' ? : |
|
7 |
213 |
$3 ? : |