| line |
true |
false |
branch |
|
65
|
2 |
29 |
if @rules != 5 |
|
72
|
27 |
109 |
if ($key eq 'month') |
|
75
|
2 |
0 |
exists $month_strs{$month} ? : |
|
79
|
26 |
110 |
if ($key eq 'day_of_week') |
|
82
|
2 |
0 |
exists $dow_strs{$dow} ? : |
|
88
|
4 |
132 |
unless @expand |
|
89
|
2 |
130 |
unless includes(\@expand, $range) |
|
90
|
23 |
107 |
if ($key eq 'day_of_week') |
|
92
|
9 |
14 |
if (&any(sub {
$_ == 7;
}
, @expand)) |
|
115
|
42 |
32 |
if (@$range != @$rule) |
|
119
|
0 |
877 |
if ($range->[$idx] != $rule->[$idx]) |
|
129
|
18 |
1 |
if ($self->_contains('minute', $lt[1]) and $self->_contains('hour', $lt[2]) and $self->_contains('month', $lt[4] + 1)) |
|
133
|
5 |
0 |
if ($self->_contains_any('day') and $self->_contains_any('day_of_week') or $self->_contains_any('day') and $self->_contains('day_of_week', $lt[6]) or $self->_contains('day', $lt[3]) and $self->_contains_any('day_of_week') or not $self->_contains_any('day') || $self->_contains_any('day_of_week') and $self->_contains('day', $lt[3]) || $self->_contains('day_of_week', $lt[6])) |