line |
true |
false |
branch |
15
|
0 |
23 |
if @_ |
18
|
0 |
23 |
unless defined $input |
22
|
2 |
21 |
if $input eq 'P0D' |
28
|
0 |
21 |
unless ($toparse =~ s/^P//) |
32
|
6 |
15 |
if ($toparse =~ s/^(\d+)D//) |
36
|
2 |
19 |
unless $toparse |
38
|
0 |
19 |
unless ($toparse =~ s/^T//) |
42
|
4 |
15 |
if ($toparse =~ s/^(\d+)H//) |
46
|
7 |
12 |
if ($toparse =~ s/^(\d+)M//) |
50
|
17 |
2 |
if ($toparse =~ s/^(\d+(?:\.\d+)?)S//) |
54
|
0 |
19 |
if ($toparse) |
64
|
0 |
23 |
if @_ |
67
|
0 |
23 |
unless defined $input |
74
|
9 |
14 |
if $toparse =~ s/\.(\d+)$// |
79
|
0 |
23 |
if ($toparse and not $toparse =~ /^\d+$/) |
92
|
6 |
17 |
if $days |
101
|
4 |
19 |
if $hours |
110
|
7 |
16 |
if $minutes |
119
|
15 |
8 |
if $seconds |
121
|
7 |
16 |
if ($dec) { } |
|
10 |
6 |
elsif ($seconds) { } |
122
|
5 |
2 |
$durtime ? : |
128
|
2 |
21 |
unless $durday or $durtime |
130
|
19 |
2 |
if $durtime |