| line |
true |
false |
branch |
|
516
|
0 |
18 |
unless $s->isa('HH::Unispool::Config::File::Token::Numbered::Device::4') |
|
532
|
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')) { } |
|
537
|
0 |
18 |
if defined $x |
|
544
|
0 |
18 |
if defined $i |
|
559
|
19 |
0 |
defined $_[0] ? : |
|
562
|
0 |
19 |
unless ref $opt eq 'HASH' |
|
565
|
0 |
19 |
unless exists $$opt{'destination_device'} |
|
569
|
18 |
1 |
exists $$opt{'execution_priority'} ? : |
|
572
|
18 |
1 |
if exists $$opt{'header_name'} |
|
575
|
18 |
1 |
exists $$opt{'initially_spooled'} ? : |
|
578
|
18 |
1 |
exists $$opt{'networkwide'} ? : |
|
581
|
18 |
1 |
exists $$opt{'save_printfile'} ? : |
|
584
|
19 |
0 |
if exists $$opt{'trailer_name'} |
|
597
|
0 |
0 |
unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name}) |
|
605
|
19 |
56 |
if (ref $val and exists $ALLOW_ISA{$name}) |
|
607
|
19 |
0 |
if &UNIVERSAL::isa($val, $class) |
|
612
|
0 |
56 |
if (ref $val and exists $ALLOW_REF{$name}) |
|
613
|
0 |
0 |
if exists $ALLOW_REF{$name}{ref $val} |
|
617
|
56 |
0 |
if (defined $val and not ref $val and exists $ALLOW_RX{$name}) |
|
619
|
56 |
0 |
if $val =~ /$rx/ |
|
624
|
0 |
0 |
if (not ref $val and exists $ALLOW_VALUE{$name}) |
|
625
|
0 |
0 |
if exists $ALLOW_VALUE{$name}{$val} |
|
640
|
0 |
5 |
unless defined $diff_number |
|
643
|
0 |
5 |
if (ref $from ne ref $to) |
|
654
|
0 |
5 |
if ($from->get_destination_device ne $to->get_destination_device) |
|
668
|
0 |
5 |
if ($from->get_header_name ne $to->get_header_name) |
|
678
|
0 |
5 |
if ($from->is_initially_spooled != $to->is_initially_spooled) |
|
688
|
0 |
5 |
if ($from->is_networkwide != $to->is_networkwide) |
|
698
|
0 |
5 |
if ($from->is_save_printfile != $to->is_save_printfile) |
|
708
|
0 |
5 |
if ($from->get_trailer_name ne $to->get_trailer_name) |
|
748
|
19 |
0 |
if ($$self{'HH_Unispool_Config_Entry_Device_4'}{'initially_spooled'}) { } |
|
759
|
19 |
0 |
if ($$self{'HH_Unispool_Config_Entry_Device_4'}{'networkwide'}) { } |
|
770
|
0 |
19 |
if ($$self{'HH_Unispool_Config_Entry_Device_4'}{'save_printfile'}) { } |
|
783
|
0 |
19 |
unless &_value_is_allowed('destination_device', $val) |
|
794
|
0 |
19 |
unless &_value_is_allowed('execution_priority', $val) |
|
805
|
0 |
18 |
unless &_value_is_allowed('header_name', $val) |
|
814
|
19 |
0 |
if (shift()) { } |
|
825
|
19 |
0 |
if (shift()) { } |
|
836
|
0 |
19 |
if (shift()) { } |
|
849
|
0 |
19 |
unless &_value_is_allowed('trailer_name', $val) |