| line |
true |
false |
branch |
|
20
|
0 |
1 |
if (my $ref = ref $date) { } |
|
21
|
0 |
0 |
if ($ref eq 'DateTime' or $ref eq 'Time::Moment') { } |
|
29
|
0 |
1 |
unless ($m, $d) = $date =~ /\A(?:\d\d\d\d-)?(\d\d)-(\d\d)\z/ |
|
33
|
0 |
1 |
if ($m == 1) { } |
|
|
0 |
1 |
elsif ($m == 2) { } |
|
|
0 |
1 |
elsif ($m == 3) { } |
|
|
0 |
1 |
elsif ($m == 4) { } |
|
|
0 |
1 |
elsif ($m == 5) { } |
|
|
0 |
1 |
elsif ($m == 6) { } |
|
|
0 |
1 |
elsif ($m == 7) { } |
|
|
0 |
1 |
elsif ($m == 8) { } |
|
|
0 |
1 |
elsif ($m == 9) { } |
|
|
0 |
1 |
elsif ($m == 10) { } |
|
|
1 |
0 |
elsif ($m == 11) { } |
|
34
|
0 |
0 |
$d <= 19 ? : |
|
36
|
0 |
0 |
$d <= 18 ? : |
|
38
|
0 |
0 |
$d <= 20 ? : |
|
40
|
0 |
0 |
$d <= 19 ? : |
|
42
|
0 |
0 |
$d <= 20 ? : |
|
44
|
0 |
0 |
$d <= 20 ? : |
|
46
|
0 |
0 |
$d <= 22 ? : |
|
48
|
0 |
0 |
$d <= 22 ? : |
|
50
|
0 |
0 |
$d <= 22 ? : |
|
52
|
0 |
0 |
$d <= 22 ? : |
|
54
|
0 |
1 |
$d <= 21 ? : |
|
56
|
0 |
0 |
$d <= 21 ? : |