| line |
true |
false |
branch |
|
59
|
105 |
3 |
if (substr($_[0], 0, 1) eq "-") |
|
67
|
104 |
714 |
if ($i =~ /^-queue/u) { } |
|
|
102 |
612 |
elsif ($i =~ /^-threads/u) { } |
|
|
102 |
510 |
elsif ($i =~ /^-memory/u) { } |
|
|
102 |
408 |
elsif ($i =~ /^-tmpdir/u) { } |
|
|
101 |
307 |
elsif ($i =~ /^-(mail|email_address)/u) { } |
|
|
101 |
206 |
elsif ($i =~ /^-(when|email_type)/u) { } |
|
|
101 |
105 |
elsif ($i =~ /^-opts/u) { } |
|
|
102 |
3 |
elsif ($i =~ /^-time/u) { } |
|
|
1 |
2 |
elsif ($i =~ /^-placeholder/u) { } |
|
|
1 |
1 |
elsif ($i =~ /^-files/u) { } |
|
|
0 |
1 |
elsif ($i =~ /^-start_time/u) { } |
|
|
0 |
1 |
elsif ($i =~ /^-start_date/u) { } |
|
68
|
0 |
104 |
unless defined $data{$i} |
|
74
|
0 |
102 |
unless defined $data{$i} |
|
76
|
102 |
0 |
if ($data{$i} =~ /^\d+$/u) { } |
|
85
|
0 |
102 |
unless defined $data{$i} |
|
91
|
0 |
102 |
unless defined $data{$i} |
|
96
|
0 |
101 |
unless defined $data{$i} |
|
101
|
0 |
101 |
unless defined $data{$i} |
|
107
|
0 |
101 |
unless defined $data{$i} |
|
109
|
0 |
101 |
if (ref $data{$i} ne "ARRAY") |
|
122
|
0 |
1 |
unless (defined $data{$i}) |
|
125
|
0 |
1 |
if ($data{$i} =~ /[\*\+\?]/u) |
|
133
|
0 |
1 |
if (ref $data{$i} ne 'ARRAY') { } |
|
141
|
0 |
0 |
unless defined $data{$i} |
|
146
|
0 |
0 |
unless defined $data{$i} |
|
158
|
104 |
3 |
defined $queue ? : |
|
159
|
102 |
5 |
defined $threads ? : |
|
160
|
102 |
5 |
defined $memory ? : |
|
161
|
102 |
5 |
defined $hours ? : |
|
162
|
102 |
5 |
defined $tmpdir ? : |
|
163
|
101 |
6 |
defined $email_address ? : |
|
164
|
101 |
6 |
defined $email_when ? : |
|
165
|
1 |
106 |
defined $files ? : |
|
166
|
1 |
106 |
defined $placeholder ? : |
|
168
|
101 |
6 |
defined $opts_array->[0] ? : |
|
185
|
0 |
109 |
if defined $new_val |
|
192
|
0 |
107 |
if defined $new_val |
|
199
|
0 |
107 |
if defined $new_val |
|
206
|
0 |
107 |
if defined $new_val |
|
213
|
0 |
107 |
if defined $new_val |
|
221
|
0 |
108 |
if defined $new_val |
|
228
|
0 |
312 |
if defined $new_val |
|
233
|
0 |
0 |
if defined $new_val |
|
239
|
0 |
0 |
if defined $new_val |
|
251
|
0 |
107 |
if defined $new_val |
|
258
|
0 |
311 |
if defined $new_val |
|
265
|
107 |
0 |
unless (defined $self->{'opts'}) |
|
270
|
0 |
0 |
if ref $new_val ne "ARRAY" |
|
271
|
0 |
0 |
if defined $new_val |
|
284
|
1 |
0 |
defined $self->{'opts'} ? : |
|
297
|
0 |
203 |
if defined $begin |
|
300
|
203 |
0 |
if defined $o |
|
320
|
202 |
1 |
if (defined $self->{'email_address'}) |
|
327
|
0 |
202 |
unless defined $o |
|
332
|
1 |
202 |
if ($self->is_array) |
|
338
|
0 |
203 |
if defined $begin |
|
354
|
102 |
0 |
if ($mem =~ /^(\d+)$/u) { } |
|
|
0 |
0 |
elsif ($mem =~ /^(\d+)\.?(MB?|GB?|TB?|KB?)$/iu) { } |
|
358
|
0 |
0 |
if (substr(uc $2, 0, 1) eq 'G') { } |
|
|
0 |
0 |
elsif (substr(uc $2, 0, 1) eq 'T') { } |
|
|
0 |
0 |
elsif (substr(uc $2, 0, 1) eq 'M') { } |
|
|
0 |
0 |
elsif (substr(uc $2, 0, 1) eq 'K') { } |
|
381
|
0 |
102 |
if ($time =~ /^(\d+)$/u) { } |
|
389
|
101 |
303 |
if ($unit eq 'D') { } |
|
|
101 |
202 |
elsif ($unit eq 'H') { } |
|
|
101 |
101 |
elsif ($unit eq 'M') { } |
|
|
101 |
0 |
elsif ($unit eq 'S') { } |
|
409
|
0 |
0 |
unless ($time =~ /^(\d{1,2}):(\d{2})(?::(\d{2}))?$/u) |
|
413
|
0 |
0 |
if $h > 23 |
|
414
|
0 |
0 |
if $m > 59 |
|
415
|
0 |
0 |
if $s > 59 |
|
426
|
0 |
0 |
if $date =~ /^\d{4}-\d{2}-\d{2}$/u |
|
428
|
0 |
0 |
unless ($date =~ m[^(\d{1,2})/(\d{1,2})(?:/(\d{4}))?$]u) |
|
432
|
0 |
0 |
if $mon < 1 or $mon > 12 |
|
433
|
0 |
0 |
if $day < 1 or $day > 31 |
|
435
|
0 |
0 |
unless (defined $year) |
|
441
|
0 |
0 |
$candidate >= $today_midnight ? : |
|
447
|
0 |
0 |
if ($check[3] != $day or $check[4] + 1 != $mon or $check[5] + 1900 != $year) |
|
459
|
406 |
0 |
unless defined $self->{'start_time'} or defined $self->{'start_date'} |
|
463
|
0 |
0 |
defined $self->{'start_time'} ? : |
|
467
|
0 |
0 |
if (defined $self->{'start_date'}) { } |
|
473
|
0 |
0 |
if ($today_begin > time) { } |