Branch Coverage

blib/lib/Date/Calc/Endpoints.pm
Criterion Covered Total %
branch 83 102 81.3


line true false branch
36 0 714 if (scalar keys %args)
39 0 714 unless ($self->type)
44 0 714 unless (scalar @start)
48 0 714 unless (scalar @end)
52 0 714 unless (scalar @last)
64 0 430 unless defined $type
67 1 429 unless ($valid_types{$type})
83 0 733 unless defined $intervals
84 732 1 if ($intervals =~ /^(?:-)?\d+$/) { }
101 0 729 unless defined $span
102 728 1 if ($span =~ /^\d+$/ and $span > 0) { }
119 0 311 unless defined $start_dow
130 310 1 if (exists $valid_dow{$start_dow}) { }
148 0 163 unless defined $start_dom
149 161 2 if ($start_dom =~ /^\d+$/ and $start_dom >= 1 and $start_dom <= 28) { }
165 0 147 unless defined $start_moy
166 145 2 if ($start_moy =~ /^\d+$/ and $start_moy >= 1 and $start_moy <= 12) { }
182 8 7 if (scalar @today) { }
184 7 1 if (@verified_date)
205 0 724 unless defined $sliding_window
206 723 1 if ($sliding_window == 0 or $sliding_window == 1) { }
223 0 724 unless defined $direction
224 723 1 if ($direction =~ /^[\+-]$/)
272 2 5 if exists $hash->{'type'}
273 0 7 if exists $hash->{'intervals'}
274 2 5 if exists $hash->{'span'}
275 4 3 if exists $hash->{'today_date'}
276 0 7 if exists $hash->{'direction'}
278 1 6 if exists $hash->{'start_day_of_week'}
280 0 7 if exists $hash->{'sliding_window'}
282 0 7 if exists $hash->{'start_day_of_month'}
284 0 7 if exists $hash->{'start_month_of_year'}
294 358 357 if ($direction eq '-')
298 238 477 if ($self->get_sliding_window) { }
299 119 119 $direction eq '+' ? :
329 168 548 if ($type eq 'YEAR') { }
42 506 elsif ($type eq 'QUARTER') { }
170 336 elsif ($type eq 'MONTH') { }
294 42 elsif ($type eq 'WEEK') { }
42 0 elsif ($type eq 'DAY') { }
331 42 126 if ($start_moy > $start[1])
341 42 128 if ($start_dom > $start[2])
353 168 126 if ($today_dow < $start_dow)
378 1 8 if ($validate)
402 588 84 $type eq 'WEEK' ? :
338 672 $type eq 'MONTH' ? :
85 1010 $type eq 'QUARTER' ? :
337 1095 $type eq 'YEAR' ? :
416 7 3 if (scalar @date == 1 and $date[0] =~ /^(\d+)-(\d+)-(\d+)$/)
419 9 1 if (scalar @date == 3 and $date[0] =~ /^\d+$/ and $date[1] =~ /^\d+$/ and $date[2] =~ /^\d+$/ and check_date(@date)) { }
444 1 2692 if ($@)