line |
true |
false |
branch |
38
|
0 |
309 |
unless my $code = $parms{'code'} || $parms{'id'} |
39
|
309 |
0 |
defined $parms{'full_days'} ? : |
40
|
309 |
0 |
defined $parms{'full_months'} ? : |
42
|
10 |
299 |
unless ($Register{$code}) |
43
|
0 |
10 |
unless my $dtl = $self->locale->load($code) |
68
|
10 |
614 |
unless ($Register{$code}{'days'}) |
69
|
1 |
9 |
$self->full_days ? : |
78
|
317 |
307 |
wantarray ? : |
84
|
1 |
5 |
unless ($Register{$code}{'narrow_days'}) |
92
|
6 |
0 |
wantarray ? : |
98
|
10 |
317 |
unless ($Register{$code}{'months'}) |
99
|
10 |
0 |
$self->full_months > 0 ? : |
103
|
10 |
317 |
wantarray ? : |
112
|
0 |
0 |
wantarray ? : |
142
|
0 |
0 |
unless ($Register{$code}{'daynum'}) |
149
|
0 |
0 |
wantarray ? : |
154
|
0 |
0 |
unless defined $day |
155
|
0 |
0 |
if ($day =~ /^\d+$/) |
160
|
0 |
0 |
if ($day =~ /^($p)/i) |
173
|
10 |
604 |
unless ($Register{$code}{'monthnum'}) |
180
|
0 |
614 |
wantarray ? : |
185
|
0 |
921 |
unless defined $mon |
186
|
307 |
614 |
if ($mon =~ /^\d+$/) |
191
|
614 |
0 |
if ($mon =~ /^($p)/i) |
209
|
0 |
0 |
wantarray ? : |
232
|
120 |
45 |
if (@{$scratch{$_};} == 1) { } |
263
|
0 |
0 |
if (@{$scratch{$_};} == 1) { } |