line |
true |
false |
branch |
645
|
0 |
18 |
unless $s->isa('HH::Unispool::Config::File::Token::Numbered::Device::2') |
665
|
17 |
54 |
if (not $tok->isa('HH::Unispool::Config::File::Token::Numbered') or $tok->get_number != $s->get_number) { } |
|
18 |
36 |
elsif ($tok->isa('HH::Unispool::Config::File::Token::Numbered::Device::P')) { } |
|
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')) { } |
670
|
0 |
18 |
if defined $p |
675
|
0 |
18 |
if defined $x |
683
|
0 |
18 |
if defined $i |
698
|
19 |
0 |
defined $_[0] ? : |
701
|
0 |
19 |
unless ref $opt eq 'HASH' |
704
|
18 |
1 |
exists $$opt{'buffer_size'} ? : |
707
|
0 |
19 |
unless exists $$opt{'device_file'} |
711
|
18 |
1 |
if exists $$opt{'device_password'} |
714
|
18 |
1 |
exists $$opt{'execution_priority'} ? : |
717
|
18 |
1 |
if exists $$opt{'header_name'} |
720
|
0 |
19 |
exists $$opt{'initially_spooled'} ? : |
723
|
18 |
1 |
exists $$opt{'networkwide'} ? : |
726
|
18 |
1 |
exists $$opt{'page_length'} ? : |
729
|
18 |
1 |
exists $$opt{'page_width'} ? : |
732
|
18 |
1 |
if exists $$opt{'profile_name'} |
735
|
18 |
1 |
exists $$opt{'save_printfile'} ? : |
738
|
18 |
1 |
if exists $$opt{'trailer_name'} |
741
|
18 |
1 |
exists $$opt{'unispool_header'} ? : |
754
|
0 |
0 |
unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name}) |
762
|
19 |
148 |
if (ref $val and exists $ALLOW_ISA{$name}) |
764
|
19 |
0 |
if &UNIVERSAL::isa($val, $class) |
769
|
0 |
148 |
if (ref $val and exists $ALLOW_REF{$name}) |
770
|
0 |
0 |
if exists $ALLOW_REF{$name}{ref $val} |
774
|
148 |
0 |
if (defined $val and not ref $val and exists $ALLOW_RX{$name}) |
776
|
148 |
0 |
if $val =~ /$rx/ |
781
|
0 |
0 |
if (not ref $val and exists $ALLOW_VALUE{$name}) |
782
|
0 |
0 |
if exists $ALLOW_VALUE{$name}{$val} |
797
|
0 |
5 |
unless defined $diff_number |
800
|
0 |
5 |
if (ref $from ne ref $to) |
811
|
0 |
5 |
if ($from->get_buffer_size ne $to->get_buffer_size) |
821
|
0 |
5 |
if ($from->get_device_file ne $to->get_device_file) |
831
|
0 |
5 |
if ($from->get_device_password ne $to->get_device_password) |
845
|
0 |
5 |
if ($from->get_header_name ne $to->get_header_name) |
855
|
0 |
5 |
if ($from->is_initially_spooled != $to->is_initially_spooled) |
865
|
0 |
5 |
if ($from->is_networkwide != $to->is_networkwide) |
875
|
0 |
5 |
if ($from->get_page_length ne $to->get_page_length) |
885
|
0 |
5 |
if ($from->get_page_width ne $to->get_page_width) |
895
|
0 |
5 |
if ($from->get_profile_name ne $to->get_profile_name) |
905
|
0 |
5 |
if ($from->is_save_printfile != $to->is_save_printfile) |
915
|
0 |
5 |
if ($from->get_trailer_name ne $to->get_trailer_name) |
925
|
0 |
5 |
if ($from->is_unispool_header != $to->is_unispool_header) |
995
|
10 |
0 |
if ($$self{'HH_Unispool_Config_Entry_Device_2'}{'initially_spooled'}) { } |
1006
|
19 |
0 |
if ($$self{'HH_Unispool_Config_Entry_Device_2'}{'networkwide'}) { } |
1017
|
0 |
19 |
if ($$self{'HH_Unispool_Config_Entry_Device_2'}{'save_printfile'}) { } |
1028
|
0 |
19 |
if ($$self{'HH_Unispool_Config_Entry_Device_2'}{'unispool_header'}) { } |
1041
|
0 |
19 |
unless &_value_is_allowed('buffer_size', $val) |
1052
|
0 |
19 |
unless &_value_is_allowed('device_file', $val) |
1063
|
0 |
18 |
unless &_value_is_allowed('device_password', $val) |
1074
|
0 |
19 |
unless &_value_is_allowed('execution_priority', $val) |
1085
|
0 |
18 |
unless &_value_is_allowed('header_name', $val) |
1094
|
19 |
0 |
if (shift()) { } |
1105
|
19 |
0 |
if (shift()) { } |
1118
|
0 |
19 |
unless &_value_is_allowed('page_length', $val) |
1129
|
0 |
19 |
unless &_value_is_allowed('page_width', $val) |
1140
|
0 |
18 |
unless &_value_is_allowed('profile_name', $val) |
1149
|
0 |
19 |
if (shift()) { } |
1162
|
0 |
18 |
unless &_value_is_allowed('trailer_name', $val) |
1171
|
0 |
19 |
if (shift()) { } |