Branch Coverage

blib/lib/Time/Interval.pm
Criterion Covered Total %
branch 33 46 71.7


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')