Branch Coverage

blib/lib/Time/LeapSecond.pm
Criterion Covered Total %
branch 62 72 86.1


line true false branch
100 1 13 unless @_ == 1
106 1 7 unless @_ == 1
112 1 10 unless @_ == 1
118 1 5 unless @_ == 1
121 3 2 $i > 0 && $DAYS[$i - 1] == $rdn ? :
146 1 11 unless @_ == 1
149 2 9 unless open my $fh, "<", $path
155 3 18 if ($line =~ /\A \s* [#] \s* expires \s+ ([0-9]{10,}) \b/xi)
159 5 13 unless $line =~ /\A Leap \b/x
161 2 11 unless $line =~ /$LeapLine_Rx/x
164 8 3 $+{'corr'} eq '+' ? :
168 8 3 $corr > 0 ? :
169 2 9 unless $+{'time'} eq $expected
173 1 8 if @days and $rdn <= $days[-1]
181 1 3 unless defined $expires
202 1 9 unless @_ == 1
205 2 7 unless open my $fh, "<", $path
222 1 16 if ($line =~ /\A \s* [#][@] \s+ ([0-9]+)/x)
226 1 15 if $line =~ /\A \s* (?: [#] | \z )/x
228 1 14 unless $line =~ /$IersLine_Rx/x
232 1 13 if defined $prev_ntp and $ntp <= $prev_ntp
236 1 12 unless $ntp % 86400 == 0
239 6 6 unless ($anchored)
240 1 5 unless $off == $base
248 1 5 unless abs $delta == 1
259 1 1 unless defined $expires
268 0 2 defined $dir ? :
273 0 0 defined $dir ? :
277 1 5 unless @_ <= 1
285 2 3 unless ($explicit)
286 2 0 unless defined $path and -f $path
290 0 1 unless @$days
297 1 1 unless @_ <= 1
302 0 1 unless ($explicit)
303 0 0 unless defined $path and -f $path
307 0 0 unless @$days