| line |
true |
false |
branch |
|
520
|
0 |
18 |
unless $s->isa('HH::Unispool::Config::File::Token::Numbered::System::3') |
|
524
|
18 |
0 |
if $s->get_number |
|
525
|
18 |
0 |
if $s->get_remote_system_name |
|
526
|
18 |
0 |
if $s->get_acct |
|
527
|
18 |
0 |
if $s->get_apass |
|
528
|
18 |
0 |
if $s->get_upass |
|
529
|
18 |
0 |
if $s->get_timeout |
|
530
|
0 |
18 |
if $s->is_high_priority_login |
|
531
|
18 |
0 |
if $s->is_initially_open |
|
532
|
18 |
0 |
if $s->get_execution_priority |
|
538
|
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::System::Info')) { } |
|
|
18 |
0 |
elsif ($tok->isa('HH::Unispool::Config::File::Token::Numbered::Network')) { } |
|
543
|
0 |
18 |
if defined $i |
|
545
|
18 |
0 |
if $i->get_description |
|
548
|
0 |
18 |
if defined $n |
|
550
|
18 |
0 |
if $n->get_remote_node_name |
|
563
|
19 |
0 |
defined $_[0] ? : |
|
566
|
0 |
19 |
unless ref $opt eq 'HASH' |
|
569
|
19 |
0 |
if exists $$opt{'acct'} |
|
572
|
19 |
0 |
if exists $$opt{'apass'} |
|
575
|
0 |
19 |
exists $$opt{'high_priority_login'} ? : |
|
578
|
18 |
1 |
if exists $$opt{'initially_open'} |
|
581
|
0 |
19 |
unless exists $$opt{'remote_node_name'} |
|
585
|
18 |
1 |
exists $$opt{'timeout'} ? : |
|
588
|
19 |
0 |
if exists $$opt{'upass'} |
|
601
|
0 |
0 |
unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name}) |
|
609
|
0 |
95 |
if (ref $val and exists $ALLOW_ISA{$name}) |
|
611
|
0 |
0 |
if &UNIVERSAL::isa($val, $class) |
|
616
|
0 |
95 |
if (ref $val and exists $ALLOW_REF{$name}) |
|
617
|
0 |
0 |
if exists $ALLOW_REF{$name}{ref $val} |
|
621
|
95 |
0 |
if (defined $val and not ref $val and exists $ALLOW_RX{$name}) |
|
623
|
95 |
0 |
if $val =~ /$rx/ |
|
628
|
0 |
0 |
if (not ref $val and exists $ALLOW_VALUE{$name}) |
|
629
|
0 |
0 |
if exists $ALLOW_VALUE{$name}{$val} |
|
644
|
0 |
5 |
unless defined $diff_number |
|
647
|
0 |
5 |
if (ref $from ne ref $to) |
|
658
|
0 |
5 |
if ($from->get_acct ne $to->get_acct) |
|
668
|
0 |
5 |
if ($from->get_apass ne $to->get_apass) |
|
678
|
0 |
5 |
if ($from->is_high_priority_login != $to->is_high_priority_login) |
|
688
|
0 |
5 |
if ($from->is_initially_open != $to->is_initially_open) |
|
698
|
0 |
5 |
if ($from->get_remote_node_name ne $to->get_remote_node_name) |
|
708
|
0 |
5 |
if ($from->get_timeout ne $to->get_timeout) |
|
718
|
0 |
5 |
if ($from->get_upass ne $to->get_upass) |
|
764
|
0 |
19 |
if ($$self{'HH_Unispool_Config_Entry_RemoteSystem_3'}{'high_priority_login'}) { } |
|
775
|
18 |
1 |
if ($$self{'HH_Unispool_Config_Entry_RemoteSystem_3'}{'initially_open'}) { } |
|
788
|
0 |
19 |
unless &_value_is_allowed('acct', $val) |
|
799
|
0 |
19 |
unless &_value_is_allowed('apass', $val) |
|
808
|
0 |
19 |
if (shift()) { } |
|
819
|
18 |
0 |
if (shift()) { } |
|
832
|
0 |
19 |
unless &_value_is_allowed('remote_node_name', $val) |
|
843
|
0 |
19 |
unless &_value_is_allowed('timeout', $val) |
|
854
|
0 |
19 |
unless &_value_is_allowed('upass', $val) |