line |
true |
false |
branch |
47
|
8 |
8 |
ref $_ eq 'Date::Range' ? : |
60
|
6 |
6 |
unless wantarray |
64
|
8 |
8 |
ref $_ eq 'Date::Range' ? : |
84
|
6 |
6 |
unless wantarray |
87
|
8 |
8 |
ref $_ eq 'Date::Simple' ? : |
114
|
6 |
75 |
if (wantarray) { } |
139
|
16 |
16 |
ref $_ eq 'Date::Simple' ? : |
229
|
4 |
199 |
if ($separator and $item =~ /$separator/) |
234
|
2 |
197 |
if $item and not $item =~ /$pattern/ |
238
|
4 |
193 |
if ($item =~ m[ ($pattern) / ($pattern) ]msx) { } |
|
193 |
0 |
elsif ($item =~ /\A ( $pattern ) \z/msx) { } |
243
|
0 |
4 |
if ($first =~ YYYYMM() or $last =~ YYYYMM()) |
245
|
0 |
0 |
unless $first =~ YYYYMM() and $last =~ YYYYMM() |
259
|
0 |
4 |
if $@ |
260
|
0 |
4 |
unless defined $date1 |
261
|
0 |
4 |
unless defined $date2 |
262
|
0 |
4 |
if $date1 > $date2 |
267
|
0 |
4 |
if $@ or not defined $range |
280
|
0 |
193 |
if $date =~ YYYYMM() |
284
|
2 |
191 |
if $@ or not defined $d |
312
|
199 |
220 |
ref $_ eq 'Date::Range' ? : |
329
|
0 |
6 |
unless wantarray |
332
|
8 |
8 |
ref $_ eq 'Date::Range' ? : |
345
|
0 |
6 |
unless wantarray |
348
|
3 |
4 |
ref $_ eq 'Date::Range' ? : |
364
|
0 |
6 |
unless wantarray |
373
|
0 |
76 |
if $@ |
376
|
6 |
70 |
unless (defined $first) |
383
|
60 |
10 |
if ($self->_next_in_range($last, $item)) |
390
|
2 |
8 |
unless ($self->_equal_value($first, $last)) |
398
|
0 |
0 |
if $@ |
408
|
0 |
6 |
if ($first eq $last) { } |
415
|
0 |
6 |
if $@ |
431
|
10 |
0 |
if (ref $first eq 'Date::Simple' and ref $last eq 'Date::Simple') { } |
|
0 |
0 |
elsif (ref $first eq 'Date::Range' and ref $last eq 'Date::Simple') { } |
|
0 |
0 |
elsif (ref $first eq 'Date::Simple' and ref $last eq 'Date::Range') { } |
|
0 |
0 |
elsif (ref $first eq 'Date::Range' and ref $last eq 'Date::Range') { } |
463
|
70 |
0 |
if (ref $first eq 'Date::Simple' and ref $last eq 'Date::Simple') |
468
|
0 |
0 |
if (ref $first eq 'Date::Simple' and ref $last eq 'Date::Range') |
473
|
0 |
0 |
if (ref $first eq 'Date::Range' and ref $last eq 'Date::Simple') |
478
|
0 |
0 |
if (ref $first eq 'Date::Range' and ref $last eq 'Date::Range') |