| line |
true |
false |
branch |
|
23
|
8 |
7 |
if (my $line = $self->_tentative_dumper_for_boolean(@_)) |
|
28
|
7 |
0 |
if ($self->can('dumper_for_unknown')) |
|
30
|
3 |
1 |
unless @retval == 1 and ref $retval[0] |
|
33
|
1 |
0 |
$type eq 'HASH' ? : |
|
|
0 |
1 |
$type eq 'ARRAY' ? : |
|
37
|
1 |
0 |
if ($line =~ /-\s*$/msx) { } |
|
54
|
9 |
6 |
if (&blessed($element)) { } |
|
|
5 |
1 |
elsif (ref $element eq 'SCALAR' and defined $$element and ref(my $bo = B::svref_2object($element)) eq 'B::IV') { } |
|
63
|
25 |
4 |
unless $element->isa($boolean) |
|
64
|
1 |
3 |
$element ? : |
|
71
|
1 |
4 |
if $value == 0 |
|
72
|
3 |
1 |
if $value == 1 |
|
112
|
0 |
19 |
unless ref $self and @$self |
|
123
|
1 |
18 |
if (not defined $cursor) { } |
|
|
3 |
15 |
elsif (not ref $cursor) { } |
|
|
4 |
11 |
elsif (ref $cursor eq 'ARRAY') { } |
|
|
4 |
7 |
elsif (ref $cursor eq 'HASH') { } |
|
132
|
1 |
3 |
unless (@$cursor) |
|
140
|
1 |
3 |
unless (%$cursor) |
|
148
|
4 |
0 |
if (@objs == 1) { } |
|
157
|
4 |
15 |
if (ref $@ eq 'SCALAR') { } |
|
|
0 |
15 |
elsif ($@) { } |
|
177
|
0 |
34 |
unless defined $string |
|
178
|
0 |
34 |
unless length $string |
|
179
|
15 |
19 |
if (&Scalar::Util::looks_like_number($string)) |
|
181
|
1 |
14 |
if ($is_key or $has_string_flag) { } |
|
188
|
0 |
19 |
if ($string =~ /[\x00-\x09\x0b-\x0d\x0e-\x1f\x7f-\x9f\'\n]/) |
|
197
|
1 |
18 |
if ($string =~ /(?:^[~!\@#%&*|>?:,'"`{}\[\]]|^-+$|\s|:\z)/ or $QUOTE{$string}) |
|
207
|
0 |
7 |
if ($$seen{&refaddr($array)}++) |
|
214
|
15 |
10 |
if (not $type) { } |
|
|
2 |
8 |
elsif ($type eq 'ARRAY') { } |
|
|
2 |
6 |
elsif ($type eq 'HASH') { } |
|
219
|
2 |
0 |
if (@$el) { } |
|
228
|
2 |
0 |
if (keys %$el) { } |
|
248
|
1 |
7 |
if ($$seen{&refaddr($hash)}++) |
|
256
|
5 |
6 |
if (not $type) { } |
|
|
2 |
4 |
elsif ($type eq 'ARRAY') { } |
|
|
2 |
2 |
elsif ($type eq 'HASH') { } |
|
261
|
2 |
0 |
if (@$el) { } |
|
270
|
2 |
0 |
if (keys %$el) { } |