line |
true |
false |
branch |
58
|
0 |
0 |
unless (scalar @allowedObjects) |
84
|
0 |
0 |
if (not ref $objectname) { } |
94
|
0 |
0 |
if ($allowedObject eq $objectname) { } |
|
0 |
0 |
elsif ($objectname =~ /.*::.*/ and not $allowedObject =~ /.*::.*/) { } |
|
0 |
0 |
elsif ($allowedObject =~ /.*::.*/ and not $objectname =~ /.*::.*/) { } |
105
|
0 |
0 |
if ("main::$allowedObject" eq $objectname) { } |
|
0 |
0 |
elsif ("::$allowedObject" eq $objectname) { } |
124
|
0 |
0 |
if ($allowedObject eq "main::$objectname") { } |
|
0 |
0 |
elsif ($allowedObject eq "::$objectname") { } |
138
|
0 |
0 |
unless ($thisObjectAllowed) |
152
|
0 |
0 |
if ($objectname =~ /.*::.*/) { } |
165
|
0 |
0 |
unless (defined eval $objectname and ref eval $objectname) |
210
|
0 |
0 |
unless (${$$self{'objRef'};}->can($method)) |
216
|
0 |
0 |
unless ($self->can($method)) |
296
|
0 |
0 |
if (${$$self{'objRef'};}->can($varName)) |