| line |
true |
false |
branch |
|
157
|
8 |
8 |
$_[1] ? : |
|
|
16 |
0 |
scalar @_ > 1 ? : |
|
240
|
1 |
32 |
if exists $opts{'placeholder'} |
|
248
|
6 |
27 |
if (my $val = $opts{'integer'}) |
|
249
|
0 |
6 |
unless isdigit($val) |
|
252
|
30 |
42 |
($val >> $_) % 2 == 1 ? : |
|
255
|
11 |
22 |
if (my $val = $opts{'string'}) |
|
256
|
0 |
11 |
unless isprint($val) |
|
261
|
2 |
9 |
if ($val =~ /^[01]{12}$/) { } |
|
281
|
37 |
23 |
$_ eq shift @complements ? : |
|
284
|
4 |
7 |
unless scalar @a == 12 |
|
289
|
15 |
14 |
if (my $val = $opts{'set'}) |
|
290
|
0 |
15 |
unless ref $val eq 'ARRAY' |
|
296
|
0 |
49 |
if $_ < 1 or $_ > 12 |
|
304
|
14 |
154 |
if $term eq $month or $term eq substr($month, 0, 3) |
|
309
|
0 |
29 |
if (my $val = $opts{'list'}) |
|
310
|
0 |
0 |
unless ref $val eq 'ARRAY' |
|
312
|
0 |
0 |
if 12 != scalar @$val |
|
316
|
0 |
0 |
$$val[$i] ? : |
|
332
|
0 |
0 |
$_ == 1 ? : |
|
344
|
102 |
306 |
$_ == 1 ? : |
|
385
|
0 |
14 |
if $_ < 1 or $_ > 12 |
|
397
|
92 |
10 |
unless $term eq lc $_ |
|
403
|
11 |
11 |
$i == scalar @_ ? : |
|
436
|
2 |
1 |
if defined $fmt_conjunction |
|
437
|
2 |
1 |
if defined $fmt_complement |
|
450
|
12 |
36 |
$$self[$_] ? : |
|
481
|
0 |
4 |
unless UNIVERSAL::isa($a, 'Date::MonthSet') and UNIVERSAL::isa($b, 'Date::MonthSet') |
|
485
|
2 |
24 |
if $$a[$_] != $$b[$_] |
|
499
|
0 |
6 |
unless UNIVERSAL::isa($a, 'Date::MonthSet') and UNIVERSAL::isa($b, 'Date::MonthSet') |
|
506
|
0 |
6 |
if $amonths != $bmonths |
|
519
|
0 |
1 |
unless UNIVERSAL::isa($a, 'Date::MonthSet') and UNIVERSAL::isa($b, 'Date::MonthSet') |
|
535
|
0 |
1 |
unless UNIVERSAL::isa($a, 'Date::MonthSet') and UNIVERSAL::isa($b, 'Date::MonthSet') |