line |
true |
false |
branch |
29
|
0 |
0 |
if (defined $_[0] and substr($_[0], 0, 1) eq "-") |
32
|
0 |
0 |
if ($i =~ /^-user/) { } |
|
0 |
0 |
elsif ($i =~ /^-jobid/) { } |
|
0 |
0 |
elsif ($i =~ /^-queue/) { } |
|
0 |
0 |
elsif ($i =~ /^-state/) { } |
|
0 |
0 |
elsif ($i =~ /^-name/) { } |
33
|
0 |
0 |
unless defined $data{$i} |
36
|
0 |
0 |
unless defined $data{$i} |
37
|
0 |
0 |
if ($data{$i} =~ /^\d+$/) { } |
43
|
0 |
0 |
unless defined $data{$i} |
46
|
0 |
0 |
unless defined $data{$i} |
48
|
0 |
0 |
if (grep {$_ eq uc $data{$i};} @valid_states) { } |
54
|
0 |
0 |
if defined $data{$i} |
85
|
0 |
0 |
if defined $username |
86
|
0 |
0 |
if defined $jobid |
87
|
0 |
0 |
if defined $state_short |
88
|
0 |
0 |
if defined $partitions_csv |
94
|
0 |
0 |
if ($? != 0) |
111
|
0 |
0 |
if (defined $jobname) |
112
|
0 |
0 |
unless $job{'-jobname'} =~ /$jobname/ |
133
|
0 |
0 |
if (wantarray) { } |