| line |
true |
false |
branch |
|
291
|
21 |
3 |
defined $_[0] ? : |
|
294
|
0 |
24 |
unless ref $opt eq 'HASH' |
|
297
|
21 |
3 |
if (exists $$opt{'scope'}) { } |
|
298
|
0 |
21 |
unless ref $$opt{'scope'} eq 'ARRAY' |
|
313
|
0 |
0 |
unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name}) |
|
321
|
0 |
57 |
if (ref $val and exists $ALLOW_ISA{$name}) |
|
323
|
0 |
0 |
if &UNIVERSAL::isa($val, $class) |
|
328
|
0 |
57 |
if (ref $val and exists $ALLOW_REF{$name}) |
|
329
|
0 |
0 |
if exists $ALLOW_REF{$name}{ref $val} |
|
333
|
57 |
0 |
if (defined $val and not ref $val and exists $ALLOW_RX{$name}) |
|
335
|
57 |
0 |
if $val =~ /$rx/ |
|
340
|
0 |
0 |
if (not ref $val and exists $ALLOW_VALUE{$name}) |
|
341
|
0 |
0 |
if exists $ALLOW_VALUE{$name}{$val} |
|
389
|
0 |
2 |
if (ref $from ne ref $to) |
|
401
|
8 |
0 |
if $to->exists_scope($vf) |
|
406
|
8 |
0 |
if $from->exists_scope($vt) |
|
430
|
0 |
24 |
unless scalar @_ |
|
433
|
0 |
24 |
unless &_value_is_allowed('scope', @_) |
|
450
|
46 |
50 |
if $self->exists_scope($scope) |
|
453
|
11 |
46 |
unless exists $USP_SCOPE_ORDER{$scope} |