| line |
true |
false |
branch |
|
19
|
1 |
19 |
unless (exists $self->{$key})
|
|
23
|
1 |
18 |
unless (defined $self->{$key})
|
|
28
|
1 |
17 |
unless ($self->{$key} =~ /^\-?(\d{1,4})\-?\d{0,2}\-?\d{0,2}$/ms)
|
|
36
|
1 |
16 |
if ($year > "DateTime"->now->year)
|
|
46
|
1 |
8 |
unless (exists $self->{$key})
|
|
50
|
1 |
7 |
unless (defined $self->{$key})
|
|
54
|
1 |
6 |
unless ($self->{$key} =~ /^(\d{1,2}).(\d{1,2}).(\d{4})$/ms)
|
|
67
|
1 |
5 |
if ($Mo::utils::Date::EVAL_ERROR)
|
|
80
|
1 |
5 |
unless (exists $self->{$key})
|
|
84
|
1 |
4 |
unless (defined $self->{$key})
|
|
88
|
2 |
2 |
unless ($self->{$key} =~ /^(\d{2})(\d{2})(\d{2})$/ms)
|
|
101
|
1 |
1 |
if ($Mo::utils::Date::EVAL_ERROR)
|
|
114
|
2 |
11 |
unless (exists $self->{$key1} and exists $self->{$key2})
|
|
118
|
2 |
9 |
unless (defined $self->{$key1} and defined $self->{$key2})
|
|
123
|
2 |
7 |
if (ref $self->{$key1} eq 'DateTime') { }
|
|
128
|
2 |
5 |
if (ref $self->{$key2} eq 'DateTime') { }
|
|
137
|
3 |
4 |
if ($cmp != -1)
|
|
148
|
11 |
1 |
if ($date =~ /^(\-?\d{1,4})\-?(\d{0,2})\-?(\d{0,2})$/ms) { }
|
|
156
|
7 |
4 |
$month ? :
|
|
|
7 |
4 |
$day ? :
|
|
162
|
1 |
10 |
if ($Mo::utils::Date::EVAL_ERROR)
|