line |
true |
false |
branch |
852
|
666 |
0 |
defined $_[0] ? : |
855
|
0 |
666 |
unless ref $opt eq 'HASH' |
858
|
0 |
666 |
if exists $$opt{'input_line_number'} |
877
|
0 |
0 |
unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name}) |
885
|
0 |
1036 |
if (ref $val and exists $ALLOW_ISA{$name}) |
887
|
0 |
0 |
if &UNIVERSAL::isa($val, $class) |
892
|
0 |
1036 |
if (ref $val and exists $ALLOW_REF{$name}) |
893
|
0 |
0 |
if exists $ALLOW_REF{$name}{ref $val} |
897
|
1036 |
0 |
if (defined $val and not ref $val and exists $ALLOW_RX{$name}) |
899
|
1036 |
0 |
if $val =~ /$rx/ |
904
|
0 |
0 |
if (not ref $val and exists $ALLOW_VALUE{$name}) |
905
|
0 |
0 |
if exists $ALLOW_VALUE{$name}{$val} |
931
|
0 |
1036 |
unless &_value_is_allowed('input_line_number', $val) |