Branch Coverage

blib/lib/Date/RetentionPolicy.pm
Criterion Covered Total %
branch 21 46 45.6


line true false branch
21 0 341 if ref $start
22 341 0 if defined $start
37 20096 1669 $keep{$_} ? :
66 1019 0 unless defined $reach_factor
80 35970 16472 if ($list->[$i][0] >= $epoch + $drift - $radius and !defined($best) || abs $list->[$i][0] - ($epoch + $drift) < abs $list->[$best][0] - ($epoch + $drift))
86 46463 55652 if $list->[$i][0] < $next_epoch - $radius * 2
88 20160 4096 if (defined $best)
92 19983 177 if $self->auto_sync
95 0 24256 if ($trace)
96 0 0 unless defined $rule_key
98 0 0 unless ($trace->{$rule_key})
109 23059 1197 if $drift
129 0 0 if defined $_->{'best'}
148 0 0 if $in_interval[$_]
154 0 0 if $cur_time != $_->[0]
156 0 0 if ($_->[1] eq 'ival') { }
0 0 elsif ($_->[1] eq 'ival-newest') { }
0 0 elsif ($_->[1] eq 'ival-oldest') { }
165 0 0 $_->[2] ? :
166 0 0 if ($claimed[$_->[1]])
177 341 1460 &looks_like_number($thing) ? :
0 1801 ref $thing && ref($thing)->can('set_time_zone') ? :
186 20305 1460 if not ref $thing and &looks_like_number($thing)