| 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) { } |