| line |
true |
false |
branch |
|
33
|
0 |
16 |
unless defined $data |
|
35
|
10 |
6 |
if (not defined $opts or &reftype($opts) ne 'HASH') { } |
|
45
|
16 |
0 |
unless exists $opts->{'escape'} |
|
50
|
10 |
6 |
if (not defined &reftype($data) or &reftype($data) ne 'HASH') { } |
|
51
|
10 |
0 |
$opts->{'escape'} ? : |
|
57
|
2 |
4 |
if (exists $data->{'_attrs'}) |
|
58
|
0 |
2 |
unless exists $opts->{'attrs'} |
|
61
|
1 |
5 |
if (exists $data->{'_cdata'}) |
|
62
|
0 |
1 |
unless exists $opts->{'cdata'} |
|
68
|
3 |
5 |
if $key =~ /^_/ |
|
71
|
0 |
5 |
if (not defined $data->{$key}) { } |
|
|
2 |
3 |
elsif (not ref $data->{$key}) { } |
|
|
3 |
0 |
elsif (&reftype($data->{$key}) eq 'HASH') { } |
|
|
0 |
0 |
elsif (&reftype($data->{$key}) eq 'ARRAY') { } |
|
95
|
5 |
11 |
if ($opts->{'root'}) |
|
100
|
3 |
2 |
if ($opts->{'attrs'}) |
|
110
|
1 |
4 |
if ($opts->{'cdata'}) |
|
111
|
1 |
0 |
$opts->{'escape'} ? : |
|
115
|
2 |
3 |
if ($xml eq '') { } |