| line |
true |
false |
branch |
|
35
|
0 |
0 |
if (@_) |
|
46
|
0 |
0 |
if $@ |
|
47
|
0 |
0 |
if (defined $as) |
|
56
|
1 |
0 |
if ($args{-'file'}) { } |
|
|
0 |
0 |
elsif ($args{-'string'}) { } |
|
57
|
0 |
1 |
unless open F, "< $args{-'file'}" |
|
71
|
0 |
0 |
if ($buf =~ /^---( \#YAML:)?/) { } |
|
|
0 |
0 |
elsif ($buf =~ /^<\?xml/) { } |
|
75
|
0 |
0 |
if ($buf =~ /
|
|
94
|
0 |
0 |
if (@_) |
|
99
|
0 |
0 |
unless $o |
|
102
|
0 |
0 |
unless defined $sep |
|
104
|
0 |
0 |
if (UNIVERSAL::isa($path, 'ARRAY')) { } |
|
111
|
0 |
0 |
if (UNIVERSAL::isa($o, 'ARRAY')) { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($o, 'HASH')) { } |
|
112
|
0 |
0 |
if (defined $$o[$p]) { } |
|
116
|
0 |
0 |
if ($do_set) |
|
122
|
0 |
0 |
if (exists $$o{$p}) { } |
|
126
|
0 |
0 |
if ($do_set) |
|
135
|
0 |
0 |
if ($do_set) |
|
154
|
0 |
0 |
unless ($as =~ /^WE_Content::/) |
|
158
|
0 |
0 |
if $@ |