Branch Coverage

blib/lib/Data/Ovulation.pm
Criterion Covered Total %
branch 32 40 80.0


line true false branch
91 4 24 if ($param) { }
92 4 0 if (ref $param eq 'ARRAY') { }
117 0 48 if $$params{'day'} < 0 or not int $$params{'day'}
119 47 1 if (defined $$params{'temp'})
141 0 3 if ($self->no_of_values < 10)
154 57 3 if (defined $$list[$day])
155 4 53 if $$list[$day] < $min
156 12 45 if $$list[$day] > $max
170 14 0 if (int $max6 > 0)
171 1 13 if (sprintf('%2.1f', $$list[$day] || 0) > $max6 and sprintf('%2.1f', $$list[$day + 1] || 0) > $max6 and sprintf('%2.1f', $$list[$day + 2] || 0) >= sprintf('%2.1f', $max6 + 0.2)) { }
1 12 elsif (sprintf('%2.1f', $$list[$day] || 0) > $max6 and sprintf('%2.1f', $$list[$day + 1] || 0) > $max6 and sprintf('%2.1f', $$list[$day + 2] || 0) > $max6 and sprintf('%2.1f', $$list[$day + 3] || 0) > $max6) { }
2 10 elsif (sprintf('%2.1f', $$list[$day]) > $max6) { }
211 4 0 if (sprintf '%2.1f', $$list[$_] > $max6)
213 2 0 if ($higher_values >= 2)
214 1 1 if (sprintf('%2.1f', $$list[$day + 3] || 0) >= sprintf('%2.1f', $max6 + 0.2))
224 3 11 if $ovulation_day
227 3 0 if ($ovulation_day)
231 1 2 if (scalar @{$list;} > $ovulation_day + 14)
240 0 6 if (sprintf('%2.1f', $$list[$day - 1]) < sprintf('%2.1f', $max6))
292 33 51 if (sprintf('%2.1f', $value) > sprintf('%2.1f', $max))