| line |
true |
false |
branch |
|
32
|
0 |
70 |
unless ref $obj eq 'CODE' |
|
40
|
1 |
69 |
unless $self->{'next'} |
|
49
|
3 |
62 |
unless defined $dots and $dots =~ /$IS_END_YAML/ |
|
59
|
0 |
53 |
unless +(shift())->{'capture'} |
|
63
|
134 |
318 |
unless wantarray |
|
72
|
0 |
337 |
unless $self->{'reader'} |
|
84
|
67 |
2 |
if ($line =~ /^ --- (?: \s* (.+?)? \s* )? $/x) { } |
|
87
|
23 |
44 |
if defined $1 |
|
91
|
22 |
22 |
if ($next =~ /^ - /x) { } |
|
|
21 |
1 |
elsif ($next =~ /$IS_HASH_KEY/) { } |
|
|
1 |
0 |
elsif ($next =~ /$IS_END_YAML/) { } |
|
114
|
0 |
16 |
unless ($str =~ s/^ " (.*?) " $/$1/x) |
|
120
|
26 |
16 |
length $1 > 1 ? : |
|
129
|
13 |
274 |
if $string eq '~' |
|
130
|
2 |
272 |
if $string eq '{}' |
|
131
|
2 |
270 |
if $string eq '[]' |
|
133
|
5 |
265 |
if ($string eq '>' or $string eq '|') |
|
136
|
0 |
5 |
unless defined $line |
|
143
|
5 |
5 |
if $ind < $indent |
|
145
|
2 |
3 |
$string eq '|' ? : |
|
149
|
3 |
2 |
$string eq '>' ? : |
|
152
|
12 |
253 |
if ($string =~ /^ ' (.*) ' $/x) |
|
157
|
16 |
237 |
if ($string =~ /$IS_QQ_STRING/) |
|
161
|
0 |
237 |
if ($string =~ /^['"]/) |
|
176
|
12 |
17 |
if ($line =~ /^ -/x) { } |
|
|
17 |
0 |
elsif ($line =~ /$IS_HASH_KEY/) { } |
|
196
|
22 |
94 |
if $indent < $limit or not defined $line or $line =~ /$IS_END_YAML/ |
|
200
|
0 |
94 |
if ($indent > $limit) |
|
204
|
6 |
88 |
if ($line =~ /^ (- \s+) \S+ \s* : (?: \s+ | $ ) /x) { } |
|
|
77 |
11 |
elsif ($line =~ /^ - \s* (.+?) \s* $/x) { } |
|
|
11 |
0 |
elsif ($line =~ /^ - \s* $/x) { } |
|
|
0 |
0 |
elsif ($line =~ /$IS_HASH_KEY/) { } |
|
210
|
1 |
76 |
if $line =~ /^---/ |
|
237
|
0 |
103 |
unless $line =~ /$HASH_LINE/ |
|
243
|
85 |
18 |
if (defined $value) { } |
|
252
|
20 |
59 |
if $indent < $limit or not defined $line or $line =~ /$IS_END_YAML/ |