| line |
true |
false |
branch |
|
23
|
1 |
745 |
if ($preserve == 1) |
|
30
|
0 |
746 |
if (keys %args) |
|
56
|
131 |
3673 |
if ($preserve_style or $preserve_alias) |
|
57
|
87 |
44 |
if (ref $node->{'value'} eq "YAML::PP::Preserve::Scalar") |
|
59
|
21 |
66 |
if ($preserve_style) |
|
67
|
6 |
3798 |
if (not $node->{'reftype'} and &reftype(\$node->{'value'}) eq "GLOB") |
|
71
|
804 |
3000 |
if ($node->{'reftype'}) { } |
|
79
|
34 |
3770 |
if ($node->{'reftype'} eq "HASH" and my $tied = tied %{$$node{"data"};}) |
|
82
|
0 |
34 |
if (my $def = $representers->{'tied_equals'}{$tied}) |
|
88
|
455 |
3349 |
if ($node->{'reftype'} eq 'HASH') { } |
|
|
266 |
3083 |
elsif ($node->{'reftype'} eq 'ARRAY') { } |
|
|
1 |
3082 |
elsif ($node->{'reftype'}) { } |
|
89
|
455 |
0 |
unless (defined $node->{'items'}) |
|
92
|
24 |
431 |
if ($self->preserve_order) { } |
|
103
|
19 |
436 |
if ($self->preserve_flow_style and &reftype($node->{'value'}) eq "HASH") |
|
104
|
18 |
1 |
if (my $tied = tied %{$$node{"value"};}) |
|
111
|
266 |
0 |
unless (defined $node->{'items'}) |
|
115
|
10 |
256 |
if ($self->preserve_flow_style and &reftype($node->{'value'}) eq "ARRAY") |
|
116
|
10 |
0 |
if (my $tied = tied @{$$node{"value"};}) |
|
126
|
3018 |
64 |
unless (defined $node->{'items'}) |
|
147
|
110 |
2890 |
unless (defined $node->{'value'}) |
|
148
|
110 |
0 |
if (my $undef = $representers->{'undef'}) { } |
|
149
|
110 |
0 |
if &$undef($self, $node) |
|
157
|
0 |
2890 |
if ($] >= "5.036" and my $rep = $representers->{'bool'}) |
|
159
|
0 |
0 |
if (&$is_bool($node->{'value'})) |
|
166
|
514 |
4440 |
if ($flags & $check_flags) |
|
167
|
505 |
9 |
if $rep->{'code'}->($self, $node) |
|
171
|
137 |
2248 |
if (my $rep = $representers->{'equals'}{$node->{'value'}}) |
|
172
|
137 |
0 |
if $rep->{'code'}->($self, $node) |
|
175
|
101 |
1943 |
if ($node->{'value'} =~ /$rep->{'regex'}/) |
|
176
|
95 |
6 |
if $rep->{'code'}->($self, $node) |
|
179
|
2153 |
0 |
unless (defined $node->{'data'}) |
|
182
|
2137 |
16 |
unless (defined $node->{'style'}) |
|
192
|
112 |
692 |
if (my $classname = &blessed($node->{'value'})) |
|
193
|
66 |
46 |
if (my $def = $representers->{'class_equals'}{$classname}) |
|
195
|
66 |
0 |
if &$code($self, $node) |
|
199
|
43 |
0 |
if (ref $re and $classname =~ /$re/ or $re) |
|
200
|
42 |
1 |
if &$code($self, $node) |
|
205
|
2 |
1 |
if ($node->{'value'}->isa($class_name)) |
|
206
|
2 |
0 |
if &$code($self, $node) |
|
210
|
4 |
690 |
if ($node->{'reftype'} eq "SCALAR" and my $scalarref = $representers->{'scalarref'}) |
|
212
|
4 |
0 |
if &$code($self, $node) |
|
214
|
4 |
686 |
if ($node->{'reftype'} eq "REF" and my $refref = $representers->{'refref'}) |
|
216
|
4 |
0 |
if &$code($self, $node) |
|
218
|
5 |
681 |
if ($node->{'reftype'} eq "CODE" and my $coderef = $representers->{'coderef'}) |
|
220
|
5 |
0 |
if &$code($self, $node) |
|
222
|
6 |
675 |
if ($node->{'reftype'} eq "GLOB" and my $glob = $representers->{'glob'}) |
|
224
|
6 |
0 |
if &$code($self, $node) |