Branch Coverage

blib/lib/HH/Unispool/Config/File/Token/Numbered/Device/P.pm
Criterion Covered Total %
branch 10 30 33.3


line true false branch
280 18 0 defined $_[0] ? :
283 0 18 unless ref $opt eq 'HASH'
286 18 0 if exists $$opt{'device_file'}
299 0 0 unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name})
307 0 62 if (ref $val and exists $ALLOW_ISA{$name})
309 0 0 if &UNIVERSAL::isa($val, $class)
314 0 62 if (ref $val and exists $ALLOW_REF{$name})
315 0 0 if exists $ALLOW_REF{$name}{ref $val}
319 62 0 if (defined $val and not ref $val and exists $ALLOW_RX{$name})
321 62 0 if $val =~ /$rx/
326 0 0 if (not ref $val and exists $ALLOW_VALUE{$name})
327 0 0 if exists $ALLOW_VALUE{$name}{$val}
350 0 44 unless defined $number
356 44 0 if defined $device_file
364 0 62 unless &_value_is_allowed('device_file', $val)