Branch Coverage

lib/Time/TAI/Simple.pm
Criterion Covered Total %
branch 26 66 39.3


line true false branch
75 0 2004 unless $success
100 0 2004 if $self->opt("agent")
101 0 2004 if $self->opt("add_agent")
106 0 2004 if $self->opt("download_leapseconds", 0)
107 4 2000 unless $self->opt("do_not_load_leapseconds")
114 0 2005 $self->opt('force_edge') ? :
124 1 0 unless defined $TAI_OR
129 1 0 unless defined $TAI10_OR
134 1 0 unless defined $TAI35_OR
140 2004 0 unless defined $self->{'tm_or'}
141 0 2004 if (defined $self->opt("base_time", undef, \%opt_h))
150 0 112 if ($ls_tm > $tm - $delta)
156 2002 2 if $self->{'mode'} eq "tai10"
157 1 2003 if $self->{'mode'} eq "tai35"
158 1004 1000 if $self->opt("fine_tune", 1)
168 0 4 if (open $fh, '<', $filename) { }
170 0 0 unless $x =~ /^(\d{10})\s+(\d{2})/
194 0 0 if (defined(my $urls = $self->opt("download_urls", undef, \%opt_h)))
195 0 0 if (ref $urls eq 'ARRAY') { }
0 0 elsif ($urls =~ /^(http:|ftp:|file:)/i) { }
207 0 0 if ($self->opt('primary')) { }
220 0 0 if $self->opt("debug")
221 0 0 if $self->opt("debug")
223 0 0 unless (defined $reply and $reply->{'success'})
224 0 0 if ($self->opt("churn_agent"))
228 0 0 if $n_tries > 1
237 0 0 if $success
245 3003 13034 if defined $self->{'opt_hr'}{$name}
246 0 2008 if defined $alt_hr and ref $alt_hr eq "HASH" and defined $alt_hr->{$name}
265 0 4 if defined $pathname
266 0 4 if ($^O eq 'MSWin32') { }
269 0 0 if -e $f
274 0 16 if -e $f