Branch Coverage

blib/lib/HH/Unispool/Config/Entry/Device/7.pm
Criterion Covered Total %
branch 47 84 55.9


line true false branch
515 0 18 unless $s->isa('HH::Unispool::Config::File::Token::Numbered::Device::7')
531 17 36 if (not $tok->isa('HH::Unispool::Config::File::Token::Numbered') or $tok->get_number != $s->get_number) { }
18 18 elsif ($tok->isa('HH::Unispool::Config::File::Token::Numbered::X')) { }
18 0 elsif ($tok->isa('HH::Unispool::Config::File::Token::Numbered::Device::Info')) { }
536 0 18 if defined $x
543 0 18 if defined $i
558 19 0 defined $_[0] ? :
561 0 19 unless ref $opt eq 'HASH'
564 0 19 unless exists $$opt{'destination_device'}
568 18 1 exists $$opt{'execution_priority'} ? :
571 18 1 if exists $$opt{'header_name'}
574 18 1 exists $$opt{'initially_spooled'} ? :
577 18 1 exists $$opt{'networkwide'} ? :
580 18 1 exists $$opt{'save_printfile'} ? :
583 18 1 if exists $$opt{'trailer_name'}
596 0 0 unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name})
604 19 55 if (ref $val and exists $ALLOW_ISA{$name})
606 19 0 if &UNIVERSAL::isa($val, $class)
611 0 55 if (ref $val and exists $ALLOW_REF{$name})
612 0 0 if exists $ALLOW_REF{$name}{ref $val}
616 55 0 if (defined $val and not ref $val and exists $ALLOW_RX{$name})
618 55 0 if $val =~ /$rx/
623 0 0 if (not ref $val and exists $ALLOW_VALUE{$name})
624 0 0 if exists $ALLOW_VALUE{$name}{$val}
639 0 5 unless defined $diff_number
642 0 5 if (ref $from ne ref $to)
653 0 5 if ($from->get_destination_device ne $to->get_destination_device)
667 0 5 if ($from->get_header_name ne $to->get_header_name)
677 0 5 if ($from->is_initially_spooled != $to->is_initially_spooled)
687 0 5 if ($from->is_networkwide != $to->is_networkwide)
697 0 5 if ($from->is_save_printfile != $to->is_save_printfile)
707 0 5 if ($from->get_trailer_name ne $to->get_trailer_name)
747 19 0 if ($$self{'HH_Unispool_Config_Entry_Device_7'}{'initially_spooled'}) { }
758 19 0 if ($$self{'HH_Unispool_Config_Entry_Device_7'}{'networkwide'}) { }
769 0 19 if ($$self{'HH_Unispool_Config_Entry_Device_7'}{'save_printfile'}) { }
782 0 19 unless &_value_is_allowed('destination_device', $val)
793 0 19 unless &_value_is_allowed('execution_priority', $val)
804 0 18 unless &_value_is_allowed('header_name', $val)
813 19 0 if (shift()) { }
824 19 0 if (shift()) { }
835 0 19 if (shift()) { }
848 0 18 unless &_value_is_allowed('trailer_name', $val)