Branch Coverage

blib/lib/HH/Unispool/Config/File/Token/Comment/Head.pm
Criterion Covered Total %
branch 13 36 36.1


line true false branch
275 18 0 defined $_[0] ? :
278 0 18 unless ref $opt eq 'HASH'
281 0 18 unless exists $$opt{'host'}
285 0 18 unless exists $$opt{'version'}
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 52 if (ref $val and exists $ALLOW_ISA{$name})
309 0 0 if &UNIVERSAL::isa($val, $class)
314 0 52 if (ref $val and exists $ALLOW_REF{$name})
315 0 0 if exists $ALLOW_REF{$name}{ref $val}
319 52 0 if (defined $val and not ref $val and exists $ALLOW_RX{$name})
321 52 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}
356 0 8 unless defined $version
368 0 26 unless defined $val
371 0 26 unless &_value_is_allowed('host', $val)
382 0 26 unless defined $val
385 0 26 unless &_value_is_allowed('version', $val)