| line |
true |
false |
branch |
|
45
|
1 |
2 |
if ($self->is_closure || $self->has_parent and defined $self->namespaces->{$ns})
|
|
58
|
5 |
1 |
if (exists $self->namespaces->{$ns}) { }
|
|
|
1 |
0 |
elsif ($self->has_parent) { }
|
|
76
|
2 |
1 |
if ($self->is_closure or $self->has_parent)
|
|
78
|
0 |
1 |
if ($d and $d->is_resolved)
|
|
82
|
2 |
0 |
if (defined $expr) { }
|
|
83
|
2 |
0 |
if ($expr->can('resolve')) { }
|
|
100
|
6 |
1 |
if (defined $self->environment->{$identifier}) { }
|
|
|
1 |
0 |
elsif ($self->has_parent) { }
|
|
138
|
0 |
1 |
unless (ref $node)
|
|
145
|
1 |
0 |
if (@ids)
|
|
156
|
0 |
1 |
if (is_ArrayRef($identifier)) { }
|
|
|
1 |
0 |
elsif (substr($identifier, 0, 1) ne '#' and not defined $environment{$identifier}) { }
|
|
157
|
0 |
0 |
unless (defined $namespaces{$$identifier[0]})
|
|
163
|
1 |
0 |
if &blessed($value)
|