| line |
true |
false |
branch |
|
26
|
32 |
0 |
if (keys %Math::Calc::Units::Convert::Date::total_unit_map == 0) |
|
46
|
2 |
5 |
if ($constructor eq 'timestamp') |
|
47
|
0 |
2 |
if $args eq '' |
|
51
|
0 |
5 |
unless $constructor eq 'date' |
|
64
|
1 |
4 |
if ($args =~ /^((?:\w\w\w\s+)?)
(\w\w\w)\s*
(\d+)\s+
(\d+):(\d+)[:.](\d+)\s+
(\w+)?\s*
(\d\d\d\d)$/x) { } |
|
|
2 |
2 |
elsif ($args =~ /^(\w\w\w)[\s-]*
(\d+)[,\s-]+
(\d\d\d\d)$/x) { } |
|
|
1 |
1 |
elsif ($args =~ /^(\d\d\d\d)-(\d+)-(\d+)\s+
(\d+):(\d+)[:.](\d+)$/x) { } |
|
|
1 |
0 |
elsif ($args =~ /^(\d\d\d\d)-(\d+)-(\d+)$/) { } |
|
99
|
3 |
2 |
if (defined $Mon) |
|
102
|
3 |
27 |
if lc $_ eq lc $Mon |
|
105
|
0 |
3 |
if $M > 11 |
|
108
|
0 |
5 |
if (defined $tz and $tz ne 'GMT') |
|
113
|
0 |
5 |
if $timestamp == -1 |
|
119
|
0 |
0 |
if $power != 1 |
|
120
|
0 |
0 |
if $mag < $min_nice_time |
|
121
|
0 |
0 |
if $mag > $max_nice_time |