| line |
true |
false |
branch |
|
74
|
1 |
35 |
if (@_ % 2) |
|
81
|
24 |
11 |
if (defined $deparse) { } |
|
82
|
6 |
18 |
if (not ref $deparse) { } |
|
|
1 |
17 |
elsif (ref $deparse ne 'ARRAY') { } |
|
92
|
3 |
32 |
unless defined $level |
|
126
|
0 |
1 |
if $@ |
|
150
|
46 |
39 |
if ((caller 1)[0] eq 'B::RecDeparse' and $body =~ s/^$key//) { } |
|
163
|
90 |
33 |
unless ($cv->CvFLAGS & 128) |
|
167
|
90 |
33 |
if defined $name |
|
179
|
89 |
23 |
if $self->_recurse |
|
202
|
67 |
46 |
if (not $$self{'brd_sub'} && $self->_recurse or $$seen{$name} or not $$cv or not $cv->isa('B::CV') or $cv->ROOT->isa('B::NULL')) { } |