| line |
true |
false |
branch |
|
231
|
0 |
16 |
if ($year < 1583) |
|
232
|
0 |
1 |
if ($year >= 2038 and "$]" < "5.012" and eval {
do {
require Config;
$Config::Config{'ivsize'}
}
} < 8) |
|
316
|
0 |
23 |
unless my $year = shift() |
|
318
|
6 |
17 |
if $Date::Holidays::BY::ref->{'cache'}{'HOLIDAYS'}{$lang}{$year} |
|
320
|
3 |
14 |
if $year < $Date::Holidays::BY::ref->{'HOLIDAYS_VALID_SINCE'} |
|
321
|
1 |
0 |
if ($strict and $year < $Date::Holidays::BY::ref->{'INACCURATE_TIMES_BEFORE'} || $year >= $Date::Holidays::BY::ref->{'INACCURATE_TIMES_SINCE'}) |
|
340
|
13 |
254 |
if ref $value eq "CODE" |
|
341
|
78 |
176 |
if ref $value ne "HASH" |
|
343
|
130 |
46 |
unless $keys[0] =~ /^\d\d\d\d$/ |
|
345
|
0 |
46 |
unless $ykey |
|
346
|
0 |
46 |
if ref $value->{$ykey} eq "CODE" |
|
359
|
1 |
19 |
unless $year and $month and $day |
|
384
|
0 |
5 |
unless $year and $month and $day |
|
386
|
0 |
5 |
if is_holiday($year, $month, $day) |
|
392
|
1 |
4 |
unless $wday eq "Sat" or $wday eq "Sun" |
|
396
|
1 |
12 |
if ($md eq _get_date_key($month, $day)) |
|
413
|
1 |
12 |
if ($md eq _get_date_key($month, $day)) |