line |
true |
false |
branch |
34
|
0 |
1 |
unless ($date1 and $date2) |
47
|
0 |
1 |
if ($string =~ /^small/i) { } |
|
0 |
1 |
elsif (not $string =~ /^\s*$/) { } |
66
|
10 |
4 |
unless (exists $p{'ConvertTo'}) |
68
|
0 |
10 |
if $p{'Debug'} |
75
|
14 |
42 |
if ($_ eq 'seconds') |
78
|
32 |
24 |
if (exists $p{$_}) |
107
|
26213 |
807 |
if ($seconds >= $Time::Interval::intervals{$_}) |
115
|
5 |
5 |
if ($p{'Small'} and $p{'Small'} != 0) { } |
|
4 |
1 |
elsif ($p{'String'} and $p{'String'} != 0) { } |
119
|
10 |
10 |
if ($time{$_} > 0) |
128
|
9 |
7 |
if ($time{$_} > 0) |
129
|
0 |
9 |
if ($time{$_} == 1) { } |
158
|
0 |
12 |
if ($_ =~ /^(\d{10})$/) { } |
175
|
5 |
5 |
if (ref $a eq 'ARRAY' and ref $b eq 'ARRAY') { } |
178
|
5 |
0 |
if ($Time::Interval::b->[0] >= $Time::Interval::a->[0] and $Time::Interval::b->[0] <= $Time::Interval::a->[1]) { } |
|
0 |
0 |
elsif ($Time::Interval::a->[0] >= $Time::Interval::b->[0] and $Time::Interval::a->[0] <= $Time::Interval::b->[1]) { } |
180
|
4 |
1 |
if ($Time::Interval::b->[1] > $Time::Interval::a->[1]) |
188
|
0 |
0 |
if ($Time::Interval::a->[1] > $Time::Interval::b->[1]) |
206
|
5 |
2 |
if (ref $_ ne 'ARRAY') |
211
|
3 |
1 |
if ($flag == 1) { } |
221
|
1 |
0 |
if (ref $pair eq 'ARRAY') |
229
|
0 |
1 |
unless (ref $_ eq 'ARRAY') |