Branch Coverage

blib/lib/Date/Parse/Lite.pm
Criterion Covered Total %
branch 54 58 93.1


line true false branch
111 4 4 if exists $params{$initialiser}
196 1173 606 if @_
197 1773 6 exists $self->{$attr} ? :
216 2384 2 if @$tokens >= 3
218 13 2373 unless $self->parsed
244 1 2 ref $_[0] ? :
249 0 7 unless length $month_name > 2
251 0 7 unless $month_number >= 1 and $month_number <= 12
259 0 2386 unless defined $string
260 1154 1232 if $string =~ /^\s*(\d\d\d\d)(\d\d)(\d\d)\s*$/
269 4 7158 unless $self->_process_token($token)
270 2373 1553 if ($self->day and $self->month and defined $self->year)
281 7103 59 if ($token =~ /^\d+$/) { }
293 2384 4719 if ($token > 31 or $token == 0 or length $token > 2 or $self->month and $self->day) { }
294 2 2382 if defined $self->year
307 13 2369 if ($year < 100 and not $self->literal_years_below_100)
310 2 11 if $year > $this_year + 50
319 1201 3518 if ($token > 12) { }
320 2 1199 if $self->day
322 869 330 if exists $self->{'_possible_month_or_day'}
334 6 3512 if ($self->month) { }
306 3206 elsif ($self->day) { }
349 1160 2046 if (exists $self->{'_possible_month_or_day'}) { }
352 869 291 if defined $self->year or $self->prefer_month_first_order
366 19 40 unless $check_month
367 0 40 if $self->month
369 13 27 if exists $self->{'_possible_month_or_day'}
377 6 53 unless length $name > 2
380 40 544 if substr($self->{'_month_names'}[$index], 0, length $name) eq $name