| line |
true |
false |
branch |
|
58
|
3 |
0 |
if $self->has_year |
|
59
|
3 |
0 |
if $self->has_month |
|
60
|
3 |
0 |
if $self->has_day |
|
62
|
0 |
3 |
unless ($self->has_year and $self->has_month and $self->has_day) |
|
113
|
3 |
76 |
unless defined $day |
|
114
|
3 |
76 |
unless defined $month |
|
115
|
3 |
76 |
unless defined $year |
|
119
|
2 |
77 |
if ($month < 7) { } |
|
154
|
2 |
0 |
$julian_day < $self->to_julian($year, 1, 1) ? : |
|
213
|
1 |
0 |
if ($dow > 0) { } |
|
|
0 |
0 |
elsif ($dow == 0) { } |
|
242
|
30 |
49 |
$self->is_leap_year($year) ? : |
|
252
|
81 |
235 |
if (3 * ($day + 1) % 7 < 3) |
|
267
|
0 |
79 |
if ($next - $present == 356) { } |
|
271
|
0 |
79 |
if ($present - $last == 382) { } |
|
284
|
11 |
52 |
if ($month == 2 or $month == 4 or $month == 6 or $month == 10 or $month == 13) |
|
289
|
2 |
50 |
if ($month == 12 and not $self->is_leap_year($year)) |
|
294
|
15 |
35 |
if ($month == 8 and not $self->days_in_year($year) % 10 == 5) |
|
299
|
13 |
22 |
if ($month == 9 and not $self->days_in_year($year) % 10 == 3) |
|
310
|
3 |
0 |
unless defined $year |
|
311
|
0 |
3 |
if (defined $month and not $month =~ /^[-+]?\d+$/) |
|
316
|
0 |
3 |
if $caller[3] eq '(eval)' |
|
318
|
0 |
0 |
defined $month ? : |
|
|
0 |
3 |
unless defined $month and $month =~ /^\+?\d+$/ and $month >= 1 and $self->is_leap_year($year) && $month <= 13 || $month <= 12 |
|
334
|
0 |
0 |
if $caller[3] eq '(eval)' |
|
336
|
0 |
0 |
unless defined $year |
|
338
|
0 |
0 |
if ($self->is_leap_year($year)) |
|
348
|
0 |
0 |
defined $month_name ? : |
|
|
0 |
0 |
unless defined $month_name and not $month_name =~ /^[-+]?\d+$/ and grep /$month_name/i, @{$months;}[1 .. $#$months] |
|
354
|
1 |
0 |
unless defined $year |
|
355
|
0 |
1 |
if (defined $month) { } |
|
363
|
0 |
1 |
if ($self->is_leap_year($year)) |