blib/lib/DateTime/Event/Recurrence.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 31 | 44 | 70.4 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
521 | 35 | 28 | 0 | $base_unit eq 'years' and exists $args{'weeks'} |
524 | 51 | 12 | 0 | $base_unit eq 'months' and exists $args{'weeks'} |
545 | 63 | 0 | 0 | defined $start and $start->is_infinite |
549 | 63 | 0 | 0 | $start and $interval > 1 |
566 | 42 | 21 | 0 | exists $args{'weeks'} and exists $args{'months'} |
603 | 93 | 0 | 6 | $base eq 'weeks' and $unit eq 'days' |
643 | 73 | 27 | 0 | $unit eq 'days' and $base_unit eq 'months' || $level_unit[-1] eq 'months' |
653 | 73 | 27 | 0 | $unit eq 'days' and $base_unit eq 'weeks' || $level_unit[-1] eq 'weeks' |
703 | 20 | 88 | 13 | @positives and @negatives |
line | l | !l | condition |
---|---|---|---|
538 | 0 | 63 | delete $args{'interval'} || 1 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
40 | 0 | 0 | 14 | exists $op1{'exclude'} or exists $op2{'exclude'} |
624 | 10 | 21 | 69 | $unit eq 'months' or $unit eq 'weeks' |
31 | 27 | 42 | $unit eq 'months' or $unit eq 'weeks' or $unit eq 'days' | |
643 | 6 | 10 | 11 | $base_unit eq 'months' || $level_unit[-1] eq 'months' |
653 | 6 | 4 | 17 | $base_unit eq 'weeks' || $level_unit[-1] eq 'weeks' |