| line |
true |
false |
branch |
|
114
|
176 |
72 |
ref $a eq '' ? : |
|
124
|
36 |
152 |
if (ref $a eq 'Math::BigRat') { } |
|
127
|
8 |
144 |
if ($a < 0) { } |
|
144
|
74 |
498 |
if (ref $a eq 'Math::BigRat') { } |
|
183
|
32 |
24 |
unless length $digits >= 4 |
|
185
|
6 |
50 |
if $sign eq '' and length $digits > 4 |
|
216
|
0 |
142 |
unless $m >= 1 and $m <= 24 |
|
218
|
53 |
89 |
if ($m == 24) { } |
|
219
|
31 |
22 |
_year_leap $y ? : |
|
221
|
10 |
79 |
_fmod($m, 6) == 0 ? : |
|
238
|
6 |
23 |
if $d == 669 |
|
258
|
2 |
31 |
unless $m >= 1 and $m <= 24 |
|
262
|
4 |
27 |
unless $d >= 1 and $d <= $md |
|
282
|
2 |
9 |
if (@_ == 1) { } |
|
286
|
2 |
7 |
unless $m >= 0 and $m < 100 |
|
288
|
2 |
5 |
unless $d >= 0 and $d < 100 |
|
314
|
100 |
57 |
_year_leap $y ? : |
|
333
|
6 |
52 |
$y == 0 ? : |
|
336
|
20 |
38 |
if ($d >= $yd) |
|
357
|
3 |
54 |
unless $d >= 1 and $d <= $yd |
|
360
|
6 |
48 |
$y == 0 ? : |
|
381
|
2 |
7 |
if (@_ == 1) { } |
|
385
|
2 |
5 |
unless $d >= 0 and $d < 1000 |