line |
true |
false |
branch |
16
|
95 |
0 |
if $level < $PEEK_LEVEL |
49
|
0 |
2 |
unless defined $defn and defined $pkg |
78
|
7 |
2 |
if ($ref eq '') { } |
|
2 |
0 |
elsif ($ref eq 'HASH') { } |
82
|
2 |
5 |
if ($res =~ m[^/(.*)]) |
89
|
0 |
5 |
unless defined $sym |
92
|
1 |
4 |
if (exists $fn_map->{$sym}) |
99
|
4 |
0 |
eval 'defined &' . $pkg . '::' . $sym ? : |
101
|
0 |
4 |
unless $is_code |
125
|
0 |
12 |
unless exists $o->{'fn'}{$func} |
141
|
0 |
10 |
unless exists $o->{'defn'}{$step} |
144
|
6 |
4 |
if ($LEVEL == 0) |
153
|
4 |
6 |
if ($ref eq '') { } |
|
6 |
0 |
elsif ($ref eq 'HASH') { } |
156
|
0 |
4 |
unless defined $fn |
168
|
0 |
6 |
unless defined $def->{'run'} |
172
|
0 |
6 |
unless defined $fn |
187
|
0 |
6 |
unless defined $next_step |
195
|
2 |
4 |
if ($next_step =~ /^&.+/) { } |
|
4 |
0 |
elsif ($next_step =~ m[^/.+]) { } |
224
|
0 |
0 |
if (ref $o eq '') |