| line |
true |
false |
branch |
|
93
|
0 |
50 |
unless (defined $cron_expression) |
|
144
|
0 |
0 |
if ($difference == 1) |
|
157
|
12 |
0 |
if (my $e = 'Exception::Class'->caught('ParseException')) |
|
177
|
50 |
0 |
unless (defined $this->seconds) |
|
180
|
50 |
0 |
unless (defined $this->minutes) |
|
183
|
50 |
0 |
unless (defined $this->hours) |
|
186
|
50 |
0 |
unless (defined $this->days_of_month) |
|
189
|
50 |
0 |
unless (defined $this->months) |
|
192
|
50 |
0 |
unless (defined $this->days_of_week) |
|
195
|
50 |
0 |
unless (defined $this->years) |
|
206
|
0 |
264 |
if $expr_on > $YEAR |
|
209
|
0 |
2 |
if ($expr_on == $DAY_OF_MONTH and index($expr, 'L') != -1 and length $expr > 1 and index($expr, ',') >= 0) |
|
223
|
0 |
2 |
if ($expr_on == $DAY_OF_WEEK and index($expr, 'L') != -1 and length $expr > 1 and index($expr, ',') >= 0) |
|
244
|
2 |
38 |
if ($expr_on <= $DAY_OF_WEEK) |
|
251
|
37 |
1 |
if ($expr_on <= $YEAR) |
|
265
|
21 |
17 |
if ($day_of_m_spec and not $day_of_w_spec) { } |
|
|
17 |
0 |
elsif ($day_of_w_spec and not $day_of_m_spec) { } |
|
282
|
12 |
38 |
if (my $pe = 'Exception::Class'->caught('ParseException')) { } |
|
|
0 |
38 |
elsif (my $e = 'Exception::Class'->caught) { } |
|
300
|
0 |
328 |
if ($i >= length $s) |
|
305
|
7 |
2 |
if (ord $c >= 65 and ord $c <= 90 and not $s eq 'L' and not $s eq 'LW') |
|
313
|
2 |
5 |
if ($type == $MONTH) { } |
|
|
3 |
2 |
elsif ($type == $DAY_OF_WEEK) { } |
|
315
|
0 |
2 |
if ($sval <= 0) |
|
321
|
0 |
2 |
if (length $s > $i + 3) |
|
323
|
0 |
0 |
if ($c eq '-') |
|
327
|
0 |
0 |
if ($eval <= 0) |
|
338
|
0 |
3 |
if ($sval < 0) |
|
344
|
0 |
3 |
if (length $s > $i + 3) |
|
346
|
0 |
0 |
if ($c eq '-') { } |
|
|
0 |
0 |
elsif ($c eq '#') { } |
|
|
0 |
0 |
elsif ($c == 'L') { } |
|
350
|
0 |
0 |
if ($eval < 0) |
|
362
|
0 |
0 |
if ($this->nthday_of_week < 1 or $this->nthday_of_week > 5) |
|
369
|
0 |
0 |
if (my $e = 'Exception::Class'->caught) |
|
391
|
0 |
5 |
if ($eval != -1) |
|
398
|
39 |
282 |
if ($c eq '?') |
|
400
|
0 |
0 |
if ($i + 1 < length $s and (substr($s, $i, 1) ne ' ' and substr($s, $i + 1, 1) ne "\t")) |
|
409
|
0 |
39 |
if ($type != $DAY_OF_WEEK and $type != $DAY_OF_MONTH) |
|
416
|
19 |
20 |
if ($type == $DAY_OF_WEEK and not $this->lastday_of_month) |
|
418
|
0 |
19 |
if ($val == $NO_SPEC_INT) |
|
431
|
111 |
171 |
if ($c eq '*' or $c eq '/') { } |
|
|
2 |
169 |
elsif ($c eq 'L') { } |
|
|
168 |
1 |
elsif (ord $c >= 48 and ord $c <= 57) { } |
|
432
|
110 |
1 |
if ($c eq '*' and $i + 1 >= length $s) { } |
|
|
0 |
1 |
elsif ($c eq '/' and $i + 1 >= length $s || substr($s, $i + 1, 1) eq ' ' || substr($s, $i + 1, 1) eq '\\t') { } |
|
|
1 |
0 |
elsif ($c eq '*') { } |
|
452
|
1 |
0 |
if ($c eq '/') { } |
|
454
|
0 |
1 |
if ($i >= length $s) |
|
464
|
1 |
0 |
if ($incr > 10) |
|
467
|
0 |
1 |
if ($incr > 59 and $type == $SECOND || $type == $MINUTE) { } |
|
|
0 |
1 |
elsif ($incr > 23 and $type == $HOUR) { } |
|
|
0 |
1 |
elsif ($incr > 31 and $type == $DAY_OF_MONTH) { } |
|
|
0 |
1 |
elsif ($incr > 7 and $type == $DAY_OF_WEEK) { } |
|
|
0 |
1 |
elsif ($incr > 12 and $type == $MONTH) { } |
|
507
|
2 |
0 |
if ($type == $DAY_OF_MONTH) |
|
510
|
0 |
2 |
if ($type == $DAY_OF_WEEK) |
|
513
|
1 |
1 |
if ($type == $DAY_OF_MONTH and length $s > $i) |
|
515
|
1 |
0 |
if ($c eq 'W') |
|
525
|
99 |
69 |
if ($i >= length $s) { } |
|
530
|
64 |
5 |
if (ord $c >= 48 and ord $c <= 57) |
|
559
|
62 |
7 |
if ($i >= length $s) |
|
566
|
2 |
5 |
if ($c eq 'L') |
|
567
|
2 |
0 |
if ($type == $DAY_OF_WEEK) { } |
|
582
|
1 |
4 |
if ($c eq 'W') |
|
583
|
1 |
0 |
if ($type == $DAY_OF_MONTH) { } |
|
598
|
1 |
3 |
if ($c eq '#') |
|
599
|
0 |
1 |
if ($type != $DAY_OF_WEEK) |
|
608
|
0 |
1 |
if ($this->nthday_of_week < 1 or $this->nthday_of_week > 5) |
|
613
|
0 |
1 |
if (my $e = 'Exception::Class'->caught) |
|
628
|
3 |
0 |
if ($c eq '-') |
|
634
|
2 |
1 |
if ($i >= length $s) |
|
639
|
1 |
0 |
if ($c >= 0 and $c <= 9) |
|
647
|
0 |
1 |
if ($i < length $s and ($c = substr($s, $i, 1)) eq '/') { } |
|
652
|
0 |
0 |
if ($i >= length $s) |
|
657
|
0 |
0 |
if ($c >= '0' and $c <= '9') { } |
|
677
|
0 |
0 |
if ($c eq '/') |
|
682
|
0 |
0 |
if ($i >= length $s) |
|
687
|
0 |
0 |
if ($c >= '0' and $c <= '9') { } |
|
757
|
93 |
226 |
if ($type == $SECOND or $type == $MINUTE) { } |
|
|
53 |
173 |
elsif ($type == $HOUR) { } |
|
|
44 |
129 |
elsif ($type == $DAY_OF_MONTH) { } |
|
|
51 |
78 |
elsif ($type == $MONTH) { } |
|
|
40 |
38 |
elsif ($type == $DAY_OF_WEEK) { } |
|
758
|
1 |
92 |
if ($val < 0 || $val > 59 || $end > 59 and $val != $ALL_SPEC_INT) |
|
768
|
1 |
52 |
if ($val < 0 || $val > 23 || $end > 23 and $val != $ALL_SPEC_INT) |
|
778
|
2 |
27 |
if ($val < 1 || $val > 31 || $end > 31 and $val != $ALL_SPEC_INT and $val != $NO_SPEC_INT) |
|
789
|
2 |
49 |
if ($val < 1 || $val > 12 || $end > 12 and $val != $ALL_SPEC_INT) |
|
799
|
1 |
27 |
if ($val == 0 || $val > 7 || $end > 7 and $val != $ALL_SPEC_INT and $val != $NO_SPEC_INT) |
|
810
|
198 |
114 |
if ($incr == 0 || $incr == -1 and $val != $ALL_SPEC_INT) |
|
812
|
198 |
0 |
if ($val != -1) { } |
|
826
|
110 |
4 |
if ($val == $ALL_SPEC_INT and $incr <= 0) |
|
831
|
18 |
96 |
if ($type == $SECOND or $type == $MINUTE) { } |
|
|
10 |
86 |
elsif ($type == $HOUR) { } |
|
|
9 |
77 |
elsif ($type == $DAY_OF_MONTH) { } |
|
|
32 |
45 |
elsif ($type == $MONTH) { } |
|
|
7 |
38 |
elsif ($type == $DAY_OF_WEEK) { } |
|
|
38 |
0 |
elsif ($type == $YEAR) { } |
|
832
|
17 |
1 |
if ($stop_at == -1) |
|
835
|
17 |
1 |
if ($start_at == -1 or $start_at == $ALL_SPEC_INT) |
|
840
|
10 |
0 |
if ($stop_at == -1) |
|
843
|
10 |
0 |
if ($start_at == -1 or $start_at == $ALL_SPEC_INT) |
|
848
|
9 |
0 |
if ($stop_at == -1) |
|
851
|
9 |
0 |
if ($start_at == -1 or $start_at == $ALL_SPEC_INT) |
|
856
|
32 |
0 |
if ($stop_at == -1) |
|
859
|
32 |
0 |
if ($start_at == -1 or $start_at == $ALL_SPEC_INT) |
|
864
|
6 |
1 |
if ($stop_at == -1) |
|
867
|
6 |
1 |
if ($start_at == -1 or $start_at == $ALL_SPEC_INT) |
|
872
|
37 |
1 |
if ($stop_at == -1) |
|
875
|
37 |
1 |
if ($start_at == -1 or $start_at == $ALL_SPEC_INT) |
|
884
|
0 |
114 |
if ($stop_at < $start_at) |
|
885
|
0 |
0 |
if ($type == $SECOND) { } |
|
|
0 |
0 |
elsif ($type == $MINUTE) { } |
|
|
0 |
0 |
elsif ($type == $HOUR) { } |
|
|
0 |
0 |
elsif ($type == $MONTH) { } |
|
|
0 |
0 |
elsif ($type == $DAY_OF_WEEK) { } |
|
|
0 |
0 |
elsif ($type == $DAY_OF_MONTH) { } |
|
|
0 |
0 |
elsif ($type == $YEAR) { } |
|
916
|
6724 |
0 |
if ($max == -1) { } |
|
927
|
0 |
0 |
if ($i2 == 0 and $type == $MONTH || $type == $DAY_OF_WEEK || $type == $DAY_OF_MONTH) |
|
947
|
46 |
353 |
if ($type == $SECOND) { } |
|
|
47 |
306 |
elsif ($type == $MINUTE) { } |
|
|
53 |
253 |
elsif ($type == $HOUR) { } |
|
|
51 |
202 |
elsif ($type == $MONTH) { } |
|
|
83 |
119 |
elsif ($type == $DAY_OF_MONTH) { } |
|
|
81 |
38 |
elsif ($type == $DAY_OF_WEEK) { } |
|
|
38 |
0 |
elsif ($type == $YEAR) { } |
|
984
|
63 |
6 |
if ($i >= length $s) |
|
993
|
2 |
63 |
$i < length $s ? : |
|
1006
|
0 |
1 |
unless ($val =~ /^\d+$/) |
|
1023
|
0 |
2 |
unless (defined $integer) |
|
1037
|
0 |
3 |
unless (defined $integer) |
|
1068
|
0 |
555 |
if ($cl->year > 2999) |
|
1085
|
466 |
89 |
if (defined $st and $st->size != 0) { } |
|
1102
|
487 |
68 |
if (defined $st and $st->size != 0) { } |
|
1112
|
209 |
346 |
if ($min != $t) |
|
1128
|
287 |
59 |
if (defined $st and $st->size != 0) { } |
|
1137
|
156 |
190 |
if ($hr != $t) |
|
1163
|
112 |
78 |
if ($day_of_m_spec and not $day_of_w_spec) { } |
|
|
78 |
0 |
elsif ($day_of_w_spec and not $day_of_m_spec) { } |
|
1167
|
10 |
102 |
if ($this->lastday_of_month) { } |
|
|
5 |
97 |
elsif ($this->nearest_weekday) { } |
|
|
84 |
13 |
elsif (defined $st and $st->size != 0) { } |
|
1168
|
4 |
6 |
if (not $this->nearest_weekday) { } |
|
1188
|
0 |
6 |
if ($dow == $SATURDAY and $day == 1) { } |
|
|
2 |
4 |
elsif ($dow == $SATURDAY) { } |
|
|
0 |
4 |
elsif ($dow == $SUNDAY and $day == $ldom) { } |
|
|
0 |
4 |
elsif ($dow == $SUNDAY) { } |
|
1210
|
0 |
6 |
if ('DateTime'->compare($tcal, $after_time) < 0) |
|
1232
|
0 |
5 |
if ($dow == $SATURDAY and $day == 1) { } |
|
|
2 |
3 |
elsif ($dow == $SATURDAY) { } |
|
|
0 |
3 |
elsif ($dow == $SUNDAY and $day == $ldom) { } |
|
|
0 |
3 |
elsif ($dow == $SUNDAY) { } |
|
1254
|
2 |
3 |
if ('DateTime'->compare($tcal, $after_time) < 0) |
|
1265
|
11 |
73 |
if ($day > $last_day) |
|
1275
|
43 |
69 |
if ($day != $t or $mon != $tmon) |
|
1282
|
1 |
42 |
if ($mon > 12) { } |
|
1296
|
16 |
62 |
if ($this->lastday_of_week) { } |
|
|
8 |
54 |
elsif ($this->nthday_of_week != 0) { } |
|
1303
|
4 |
12 |
if ($c_dow < $dow) |
|
1306
|
6 |
10 |
if ($c_dow > $dow) |
|
1312
|
4 |
12 |
if ($day + $days_to_add > $l_day) |
|
1331
|
6 |
6 |
if ($days_to_add > 0) |
|
1350
|
1 |
7 |
if ($c_dow < $dow) { } |
|
|
4 |
3 |
elsif ($c_dow > $dow) { } |
|
1358
|
5 |
3 |
if ($days_to_add > 0) |
|
1364
|
8 |
0 |
if ($day % 7 > 0) |
|
1370
|
2 |
6 |
if ($days_to_add < 0 or $day > $this->getlastday_of_month($mon, $cl->year)) { } |
|
|
3 |
3 |
elsif ($days_to_add > 0 or $day_shifted) { } |
|
1400
|
46 |
8 |
if (defined $st and $st->size > 0) |
|
1405
|
10 |
44 |
if ($c_dow < $dow) |
|
1408
|
8 |
46 |
if ($c_dow > $dow) |
|
1414
|
1 |
53 |
if ($day + $days_to_add > $l_day) { } |
|
|
17 |
36 |
elsif ($days_to_add > 0) { } |
|
1463
|
0 |
114 |
if ($year > 2099) |
|
1468
|
102 |
12 |
if (defined $st and $st->size != 0) { } |
|
1476
|
17 |
97 |
if ($mon != $t) |
|
1497
|
97 |
0 |
if (defined $st and $st->size != 0) { } |
|
1505
|
0 |
97 |
if ($year != $t) |
|
1539
|
1 |
364 |
if ($hour == 24) |
|
1546
|
1 |
364 |
if ($delta > 0) |