| line |
true |
false |
branch |
|
124
|
66 |
36 |
unless ($source =~ /$date_regex/u) |
|
129
|
36 |
0 |
if (keys %-) { } |
|
141
|
2 |
34 |
if ($ymd{'monthname'}) { } |
|
143
|
0 |
2 |
unless (exists $month_names{lc $ymd{'monthname'}}) |
|
152
|
0 |
36 |
if $ymd{'year'} < 100 |
|
154
|
36 |
108 |
if $n eq "monthname" |
|
168
|
13 |
78 |
ref $date_type{$dt} eq 'ARRAY' ? : |
|
171
|
36 |
66 |
if ($r) |
|
184
|
0 |
6 |
unless ref $sources eq "ARRAY" |
|
188
|
11 |
0 |
if (scalar keys %fmts) { } |
|
205
|
0 |
6 |
unless defined $sources |
|
207
|
0 |
6 |
unless ref $sources eq "ARRAY" |
|
211
|
0 |
0 |
if ($values->{'no_date'} and @{$values->{'no_date'};} and $options{'mode'} eq "strict") |
|
217
|
0 |
6 |
if (scalar keys %$values == 1) { } |
|
|
4 |
2 |
elsif ($options{'components'}) { } |
|
228
|
3 |
1 |
if ($$values{$options{'components'}}) |
|
235
|
0 |
8 |
unless length $b <=> length $a |
|
237
|
10 |
4 |
if ($comp =~ /$s/u) |
|
242
|
8 |
0 |
$res{$_} ? : |
|
243
|
4 |
0 |
wantarray ? : |
|
251
|
0 |
2 |
if (scalar keys %mode != 1 and $options{'mode'} eq 'strict') { } |
|
257
|
2 |
0 |
wantarray ? : |