line |
true |
false |
branch |
30
|
0 |
8 |
if (exists $parms{'step'} and not $parms{'step'} =~ /^\d+$/) |
41
|
0 |
8 |
exists $parms{'step'} ? : |
54
|
0 |
16 |
unless defined $date |
56
|
4 |
12 |
if (XXX) { } |
|
0 |
12 |
elsif (XXX) { } |
|
6 |
6 |
elsif ($date =~ /^(\d\d\d\d)-(\d\d)-(\d\d)$/) { } |
|
6 |
0 |
elsif ($date =~ /^(\d\d\d\d)(\d\d)(\d\d)$/) { } |
76
|
16 |
0 |
if (check_date(@$ymdref)) { } |
89
|
0 |
40 |
if $@ |
91
|
7 |
33 |
if $self->{'delta'} > $self->{'maxdelta'} |
95
|
11 |
22 |
if ($self->{'format'} == 1) { } |
|
11 |
11 |
elsif ($self->{'format'} == 2) { } |
96
|
0 |
11 |
wantarray ? : |