| line |
true |
false |
branch |
|
40
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
|
|
0 |
0 |
@_ == 1 ? : |
|
44
|
0 |
0 |
if $args{'style'} eq '2' |
|
48
|
0 |
0 |
unless open INFILE, "$fn" |
|
53
|
0 |
0 |
if ($altstyle) |
|
70
|
0 |
0 |
if (ref $i eq 'HASH') { } |
|
72
|
0 |
0 |
if ($j =~ /^(.*?)\_(.*?)\_([0-9]+)\_attr$/) { } |
|
75
|
0 |
0 |
if (ref $$i{$tagnm} eq 'ARRAY') { } |
|
77
|
0 |
0 |
if (ref $$i{$tagnm}[$cnt] eq '') |
|
80
|
0 |
0 |
unless ($hold =~ /^\s*$/) |
|
89
|
0 |
0 |
if (ref $$i{$tagnm} eq 'HASH') { } |
|
99
|
0 |
0 |
unless ($hold =~ /^\s*$/) |
|
111
|
0 |
0 |
if (ref $i eq 'ARRAY') |
|
195
|
0 |
0 |
if ($xml =~ m[^[\s\n]*\<$firsttag(\>|[\s\n]\>|[\s\n][^\>]*[^/]\>)(.*?)\$firsttag\>(.*)$]s) { } |
|
203
|
0 |
0 |
if ($xml =~ m[^[\s\n]*\<$firsttag(/\>|[\s\n][^\>]*/\>)(.*)$]s) { } |
|
208
|
0 |
0 |
unless (ref $xml) |
|
219
|
0 |
0 |
if ($xmlfragment =~ m[^(.*?)\$firsttag\>(.*)$]s) { } |
|
247
|
0 |
0 |
if ($xmlfragment =~ m[^(.*?)\<$firsttag(\>|[\s\n]\>|[\s\n][^\>]*[^/]\>)(.*?)\$firsttag\>(.*)$]s) { } |
|
250
|
0 |
0 |
unless ($retflag) |
|
259
|
0 |
0 |
if ($xmlfragment =~ m[^(.*?)\<$firsttag(/\>|[\s\n][^\>]*/\>)(.*)$]s) { } |
|
260
|
0 |
0 |
unless ($retflag) |
|
289
|
0 |
0 |
if ($opening{$k} > $closing{$k}) |
|
295
|
0 |
0 |
if $flag |
|
300
|
0 |
0 |
if ($xmlfragment2 =~ m[(.*?)\$firsttag\>(.*)$]s) { } |
|
324
|
0 |
0 |
if (@retarr) |
|
331
|
0 |
0 |
if (ref $remainderparse eq 'HASH') |
|
336
|
0 |
0 |
if (keys %{$rethash;}) { } |