line |
true |
false |
branch |
180
|
1 |
0 |
defined $_[0] ? : |
183
|
0 |
1 |
unless ref $opt eq 'HASH' |
186
|
0 |
1 |
unless exists $$opt{'export_tag_name'} |
200
|
0 |
0 |
unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name}) |
208
|
0 |
1 |
if (ref $val and exists $ALLOW_ISA{$name}) |
210
|
0 |
0 |
if &UNIVERSAL::isa($val, $class) |
215
|
0 |
1 |
if (ref $val and exists $ALLOW_REF{$name}) |
216
|
0 |
0 |
if exists $ALLOW_REF{$name}{ref $val} |
220
|
1 |
0 |
if (defined $val and not ref $val and exists $ALLOW_RX{$name}) |
222
|
1 |
0 |
if $val =~ /$rx/ |
227
|
0 |
0 |
if (not ref $val and exists $ALLOW_VALUE{$name}) |
228
|
0 |
0 |
if exists $ALLOW_VALUE{$name}{$val} |
250
|
0 |
1 |
unless defined $val |
253
|
0 |
1 |
unless &_value_is_allowed('export_tag_name', $val) |