line |
true |
false |
branch |
170
|
210 |
2 |
if (ref $arg eq '') { } |
171
|
22 |
188 |
if ($arg =~ /^_TINY_XML_STRING_/) { } |
175
|
1 |
187 |
unless open FH, $arg |
180
|
2 |
209 |
if not defined $file or $file =~ /^\s*$/ |
183
|
5 |
204 |
if $file =~ /[\x00-\x08\x0b\x0c\x0e-\x1f]/ |
189
|
1 |
1 |
$1 eq '<' ? : |
|
2 |
2 |
$1 eq '&' ? : |
196
|
45 |
172 |
if $_ |
199
|
2 |
194 |
if $file =~ /]]>/ or $file =~ //s or grep {/--/ if $_;} $file =~ /^\s+||\s+$/gs |
210
|
111 |
83 |
if ($params{'fatal_declarations'} and $file =~ /
|
215
|
1064 |
226 |
if length $_ |
217
|
6 |
743 |
if ($token =~ /<\?$regexps{'name'}.*?\?>/is or $token =~ /^
|
|
241 |
502 |
elsif ($token =~ m[^($regexps{'name'})\s*>]i) { } |
|
351 |
151 |
elsif ($token =~ m[^<$regexps{'name'}(\s[^>]*)*(\s*/)?>]is) { } |
|
13 |
138 |
elsif ($token =~ /^) { } |
223
|
3 |
238 |
if $$elem{'name'} ne $1 |
233
|
350 |
1 |
if (@{$attrib;} == 2 * keys(%{+{@{$attrib;}};})) { } |
241
|
12 |
338 |
if $attribs_raw =~ /\S/ or grep {/;} values %{$attrib;} |
243
|
337 |
1 |
unless ($params{'no_entity_parsing'}) |
257
|
70 |
264 |
if ($token =~ m[\s*/>$]) |
265
|
137 |
1 |
unless ($params{'no_entity_parsing'}) |
269
|
0 |
42 |
if exists $$elem{'parent'} |
270
|
12 |
30 |
if $#{$$elem{'content'};} > 0 |
272
|
1 |
29 |
if $#{$$elem{'content'};} == -1 or $$elem{'content'}[0]{'type'} ne 'e' |
280
|
22 |
267 |
$strict_entity_parsing ? : |
282
|
2 |
5 |
substr($3, 0, 1) eq 'x' ? : |
|
7 |
12 |
$1 eq 'amp;' ? : |
|
19 |
19 |
$1 eq 'quot;' ? : |
|
1 |
38 |
$1 eq 'apos;' ? : |
|
89 |
39 |
$1 eq 'gt;' ? : |
|
84 |
128 |
$1 eq 'lt;' ? : |
|
7 |
212 |
$3 ? : |