| line |
true |
false |
branch |
|
38
|
0 |
1 |
unless @_ >= 1 |
|
55
|
0 |
8 |
unless ref $self |
|
56
|
0 |
8 |
if $$self{'_fetched'} and $$self{'_fetched'} < 0 |
|
67
|
1 |
38 |
unless $$self{'_fetched'} |
|
82
|
0 |
0 |
if $$params{'reporter'} |
|
83
|
0 |
0 |
if $$params{'chooser_if_reporters'} |
|
84
|
0 |
0 |
if $$params{'chooser'} and not $$params{'chooser_if_reporters'} |
|
95
|
0 |
0 |
unless $self and ref $self |
|
98
|
0 |
0 |
wantarray ? : |
|
102
|
0 |
14 |
unless $self and ref $self |
|
111
|
0 |
0 |
unless $self and ref $self |
|
118
|
0 |
7 |
unless $self and ref $self |
|
127
|
14 |
0 |
if $host->host_match(%params) |
|
129
|
7 |
0 |
wantarray ? : |
|
133
|
0 |
0 |
unless $self and ref $self |
|
140
|
0 |
0 |
wantarray ? : |
|
144
|
0 |
12 |
unless $self and ref $self |
|
152
|
0 |
1 |
unless $self and ref $self |
|
159
|
2 |
62 |
if /^class_/ and $host->get($_) |
|
163
|
1 |
0 |
wantarray ? : |
|
171
|
0 |
1 |
unless $self and ref $self |
|
186
|
0 |
0 |
unless $self and ref $self |
|
197
|
0 |
0 |
wantarray ? : |
|
201
|
0 |
4 |
unless $self and ref $self |
|
214
|
0 |
8 |
if ($params{'ign_pctcpu'}) { } |
|
|
0 |
8 |
elsif ($params{'by_pctcpu'}) { } |
|
218
|
0 |
0 |
if $adj < 0 |
|
228
|
4 |
0 |
wantarray ? : |
|
238
|
2 |
0 |
unless $host->exists($field) |
|
240
|
0 |
0 |
unless $val |
|
241
|
0 |
0 |
if $val > 9 |
|
263
|
0 |
0 |
if $hostwidth < length $host->hostname |
|
282
|
0 |
48 |
unless defined $$rowref[$col] |
|
283
|
26 |
22 |
if ($widths[$col] || 0) < length $$rowref[$col] |
|
295
|
40 |
8 |
if $col > 0 |
|
314
|
0 |
2 |
if $host->reserved |
|
315
|
2 |
0 |
$host->reservable ? : |
|
339
|
0 |
0 |
$hold->allocated ? : |
|
356
|
0 |
0 |
$host ? : |
|
405
|
0 |
0 |
defined $host->slreportd_delay ? : |
|
429
|
0 |
1 |
if $p->pctcpu < $$hosts{'min_pctcpu'} |
|
430
|
0 |
1 |
$p->exists('cmndcomment') ? : |
|
452
|
0 |
0 |
$p->exists('cmndcomment') ? : |
|
453
|
0 |
0 |
$p->exists('req_hostname') ? : |
|
478
|
0 |
0 |
$p->exists('cmndcomment') ? : |
|
479
|
0 |
0 |
$p->exists('req_hostname') ? : |
|
|
0 |
0 |
$$params{'signal'} ? : |
|
507
|
2 |
0 |
if ($val) |
|
508
|
0 |
2 |
if $col_width[$classnum] < length $val |
|
509
|
0 |
2 |
if $val > 1 |
|
529
|
0 |
1 |
if $classnum != $classes - 1 |
|
532
|
0 |
1 |
$classnum == $classes - 1 ? : |
|
540
|
0 |
2 |
if ($val and $val > 1 || $class_numeric{$class}) { } |
|
|
2 |
0 |
elsif ($val) { } |
|
560
|
0 |
1 |
unless $self and ref $self |
|
568
|
0 |
1 |
if $Schedule::Load::Hosts::Debug |
|
569
|
0 |
1 |
unless defined $$params{'comment'} |
|
581
|
0 |
1 |
if ref $$self{'dhost'} eq 'ARRAY' |
|
585
|
0 |
1 |
if $Schedule::Load::Hosts::Debug |
|
590
|
1 |
0 |
if ($fh) |
|
591
|
0 |
1 |
if $Schedule::Load::Hosts::Debug |
|
595
|
0 |
1 |
unless ($fh) |
|
596
|
0 |
0 |
if (defined $$self{'print_down'}) |
|
616
|
20 |
0 |
if ($done) { } |
|
619
|
0 |
0 |
if $Schedule::Load::Hosts::Debug |
|
629
|
1 |
19 |
unless (defined $$self{'_fh'}) |
|
634
|
0 |
20 |
if $Schedule::Load::Hosts::Debug |
|
641
|
27 |
0 |
unless ($$self{'_inbuffer'} =~ /\n/) |
|
646
|
0 |
0 |
if !defined($rv) || length $data == 0 and ($! != 4 and $! != 11) |
|
654
|
0 |
80 |
if $Schedule::Load::Hosts::Debug |
|
657
|
0 |
80 |
if $line =~ /^\s*$/ |
|
658
|
20 |
60 |
if ($cmd eq 'DONE') { } |
|
|
48 |
12 |
elsif ($cmd eq 'host') { } |
|
|
4 |
8 |
elsif ($cmd eq 'schrtn') { } |
|
|
8 |
0 |
elsif ($cmd eq 'chooinfo') { } |
|
673
|
0 |
20 |
if ($eof or not $fh->connected) |
|
677
|
0 |
20 |
if $Schedule::Load::Hosts::Debug |