| line |
true |
false |
branch |
|
29
|
2 |
0 |
if (substr($_[0], 0, 1) eq "-") |
|
33
|
2 |
3 |
if ($i =~ /^-user/) { } |
|
|
0 |
3 |
elsif ($i =~ /^-jobid/) { } |
|
|
0 |
3 |
elsif ($i =~ /^-queue/) { } |
|
|
0 |
3 |
elsif ($i =~ /^-status/) { } |
|
|
0 |
3 |
elsif ($i =~ /^-name/) { } |
|
|
3 |
0 |
elsif ($i =~ /^-(\w+)/) { } |
|
37
|
0 |
0 |
if ($data{$i} =~ /^\d+$/) { } |
|
46
|
0 |
0 |
if (grep {$_ eq uc $data{$i};} @VALID_STATUS) { } |
|
55
|
2 |
1 |
if (grep {$_ eq uc $1;} @VALID_ATTR) { } |
|
56
|
2 |
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 |