Branch Coverage

lib/Time/TAI/Simple.pm
Criterion Covered Total %
branch 24 48 50.0


line true false branch
73 0 2004 unless $success
88 0 2004 if $self->opt('download_leapseconds', 0)
89 4 2000 unless $self->opt('do_not_load_leapseconds')
99 1 0 unless defined $TAI_OR
104 1 0 unless defined $TAI10_OR
109 1 0 unless defined $TAI35_OR
115 2004 0 unless defined $$self{'tm_or'}
116 0 2004 if (defined $self->opt('base_time', undef, \%opt_h))
125 4 104 if ($ls_tm > $tm - $delta)
131 2002 2 if $$self{'mode'} eq 'tai10'
132 1 2003 if $$self{'mode'} eq 'tai35'
133 1004 1000 if $self->opt('fine_tune', 1)
143 0 4 if (open $fh, '<', $filename) { }
145 0 0 unless $x =~ /^(\d{10})\s+(\d{2})/
169 0 0 if (defined(my $urls = $self->opt('download_urls', undef, \%opt_h)))
170 0 0 if (ref $urls eq 'ARRAY') { }
0 0 elsif ($urls =~ /^(http:|ftp:|file:)/i) { }
183 0 0 unless defined $reply and $reply =~ /^2/
195 3003 7021 if defined $$self{'opt_hr'}{$name}
196 0 2008 if defined $alt_hr and ref $alt_hr eq 'HASH' and defined $$alt_hr{$name}
215 0 4 if defined $pathname
216 0 4 if ($^O eq 'MSWin32') { }
219 0 0 if -e $f
224 0 16 if -e $f