Branch Coverage

lib/Time/TAI/Simple.pm
Criterion Covered Total %
branch 23 48 47.9


line true false branch
72 0 2004 unless $success
87 0 2004 if $self->opt('download_leapseconds', 0)
88 4 2000 unless $self->opt('do_not_load_leapseconds')
98 1 0 unless defined $TAI_OR
103 1 0 unless defined $TAI10_OR
108 1 0 unless defined $TAI35_OR
114 2004 0 unless defined $$self{'tm_or'}
115 0 2004 if (defined $self->opt('base_time', undef, \%opt_h))
124 0 104 if ($ls_tm > $tm - $delta)
130 2002 2 if $$self{'mode'} eq 'tai10'
131 1 2003 if $$self{'mode'} eq 'tai35'
132 1004 1000 if $self->opt('fine_tune', 1)
142 0 4 if (open $fh, '<', $filename) { }
144 0 0 unless $x =~ /^(\d{10})\s+(\d{2})/
168 0 0 if (defined(my $urls = $self->opt('download_urls', undef, \%opt_h)))
169 0 0 if (ref $urls eq 'ARRAY') { }
0 0 elsif ($urls =~ /^(http:|ftp:|file:)/i) { }
182 0 0 unless defined $reply and $reply =~ /^2/
194 3003 7021 if defined $$self{'opt_hr'}{$name}
195 0 2008 if defined $alt_hr and ref $alt_hr eq 'HASH' and defined $$alt_hr{$name}
214 0 4 if defined $pathname
215 0 4 if ($^O eq 'MSWin32') { }
218 0 0 if -e $f
223 0 16 if -e $f