| line |
true |
false |
branch |
|
42
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
|
|
0 |
0 |
@_ == 1 ? : |
|
46
|
0 |
0 |
if $args{'style'} eq '2' |
|
50
|
0 |
0 |
unless open INFILE1, "$fn" |
|
57
|
0 |
0 |
if ($c1 eq "\376" and $c2 eq "\377" or $c1 eq "\377" and $c2 eq "\376") { } |
|
59
|
0 |
0 |
unless open INFILE, '<:encoding(UTF-16)', "$fn" |
|
62
|
0 |
0 |
if ($c1 eq "\357" and $c2 eq "\273" and $c3 eq "\277") { } |
|
64
|
0 |
0 |
unless open INFILE, '<:encoding(UTF-8)', "$fn" |
|
72
|
0 |
0 |
unless open INFILE, '<:encoding(UTF-8)', "$fn" |
|
79
|
0 |
0 |
if ($altstyle) |
|
96
|
0 |
0 |
if (ref $i eq 'HASH') { } |
|
98
|
0 |
0 |
if ($j =~ /^(.*?)\_(.*?)\_([0-9]+)\_attr$/) { } |
|
103
|
0 |
0 |
if (ref $i->{$tagnm} eq 'ARRAY') { } |
|
105
|
0 |
0 |
if (ref $i->{$tagnm}[$cnt] eq '') |
|
108
|
0 |
0 |
unless ($hold =~ /^\s*$/) |
|
117
|
0 |
0 |
if (ref $i->{$tagnm} eq 'HASH') { } |
|
127
|
0 |
0 |
unless ($hold =~ /^\s*$/) |
|
139
|
0 |
0 |
if (ref $i eq 'ARRAY') |
|
231
|
0 |
0 |
if ($xml =~ m[^[\s\n]*\<$firsttag(\>|[\s\n]\>|[\s\n][^\>]*[^/]\>)(.*?)\${firsttag}[\s\n]*\>(.*)$]s) { } |
|
239
|
0 |
0 |
if ($xml =~ m[^[\s\n]*\<$firsttag(/\>|[\s\n][^\>]*/\>)(.*)$]s) { } |
|
245
|
0 |
0 |
unless (ref $xml) |
|
249
|
0 |
0 |
if ($xml eq '') { } |
|
260
|
0 |
0 |
if ($xmlfragment =~ m[^(.*?)\${firsttag}[\s\n]*\>(.*)$]s) { } |
|
282
|
0 |
0 |
if ($altstyle) |
|
293
|
0 |
0 |
if ($xmlfragment =~ m[^(.*?)\<$firsttag(\>|[\s\n]\>|[\s\n][^\>]*[^/]\>)(.*?)\${firsttag}[\s\n]*\>(.*)$]s) { } |
|
296
|
0 |
0 |
unless ($retflag) |
|
305
|
0 |
0 |
if ($xmlfragment =~ m[^(.*?)\<$firsttag(/\>|[\s\n][^\>]*/\>)(.*)$]s) { } |
|
306
|
0 |
0 |
unless ($retflag) |
|
343
|
0 |
0 |
if ($opening{$k} > $closing{$k}) |
|
349
|
0 |
0 |
if $flag |
|
354
|
0 |
0 |
if ($xmlfragment2 =~ m[(.*?)\${firsttag}[\s\n]*\>(.*)$]s) { } |
|
373
|
0 |
0 |
if ($altstyle) |
|
383
|
0 |
0 |
if (@retarr) |
|
384
|
0 |
0 |
if (@retarr == 1) { } |
|
394
|
0 |
0 |
if (ref $remainderparse eq 'HASH') |
|
399
|
0 |
0 |
if (keys %{$rethash;}) { } |