| line |
true |
false |
branch |
|
272
|
237 |
0 |
defined $_[0] ? : |
|
275
|
0 |
237 |
unless ref $opt eq 'HASH' |
|
278
|
0 |
237 |
exists $$opt{'diff_number'} ? : |
|
281
|
210 |
27 |
if exists $$opt{'number'} |
|
294
|
0 |
0 |
unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name}) |
|
302
|
0 |
318 |
if (ref $val and exists $ALLOW_ISA{$name}) |
|
304
|
0 |
0 |
if &UNIVERSAL::isa($val, $class) |
|
309
|
0 |
318 |
if (ref $val and exists $ALLOW_REF{$name}) |
|
310
|
0 |
0 |
if exists $ALLOW_REF{$name}{ref $val} |
|
314
|
318 |
0 |
if (defined $val and not ref $val and exists $ALLOW_RX{$name}) |
|
316
|
318 |
0 |
if $val =~ /$rx/ |
|
321
|
0 |
0 |
if (not ref $val and exists $ALLOW_VALUE{$name}) |
|
322
|
0 |
0 |
if exists $ALLOW_VALUE{$name}{$val} |
|
337
|
0 |
58 |
unless defined $diff_number |
|
340
|
0 |
58 |
if (ref $from ne ref $to) |
|
351
|
0 |
58 |
if ($from->is_diff_number and $from->get_number ne $to->get_number) |
|
373
|
0 |
58 |
if ($$self{'HH_Unispool_Config_Entry_Numbered'}{'diff_number'}) { } |
|
384
|
0 |
237 |
if (shift()) { } |
|
397
|
0 |
318 |
unless &_value_is_allowed('number', $val) |