line |
true |
false |
branch |
29
|
2 |
0 |
if (substr($_[0], 0, 1) eq "-") |
33
|
2 |
4 |
if ($i =~ /^-user/) { } |
|
0 |
4 |
elsif ($i =~ /^-jobid/) { } |
|
0 |
4 |
elsif ($i =~ /^-queue/) { } |
|
0 |
4 |
elsif ($i =~ /^-status/) { } |
|
0 |
4 |
elsif ($i =~ /^-name/) { } |
|
4 |
0 |
elsif ($i =~ /^-(\w+)/) { } |
37
|
0 |
0 |
if ($data{$i} =~ /^\d+$/) { } |
46
|
0 |
0 |
if (grep {$_ eq uc $data{$i};} @VALID_STATUS) { } |
55
|
3 |
1 |
if (grep {$_ eq uc $1;} @VALID_ATTR) { } |
56
|
3 |
0 |
if (defined $data{$i}) { } |
74
|
1 |
0 |
defined $username ? : |
75
|
0 |
1 |
defined $queue ? : |
76
|
0 |
1 |
defined $name ? : |
77
|
0 |
1 |
defined $jobid ? : |
78
|
0 |
1 |
defined $status ? : |
86
|
0 |
1 |
if defined $new_val |
93
|
0 |
1 |
if defined $new_val |
100
|
0 |
1 |
if defined $new_val |
107
|
0 |
1 |
if defined $new_val and not $new_val =~ /^\d+$/ |
108
|
0 |
1 |
if defined $new_val |
115
|
0 |
1 |
if defined $new_val and not grep({$_ eq uc $new_val;} @VALID_STATUS) |
116
|
0 |
1 |
if defined $new_val |