Branch Coverage

blib/lib/Time/Precise.pm
Criterion Covered Total %
branch 43 88 48.8


line true false branch
93 0 9 unless defined $arg
96 5 4 if (wantarray) { }
97 5 0 $gm ? :
98 5 0 if $Time::Precise::PRECISION
102 4 0 $gm ? :
103 4 0 $Time::Precise::PRECISION ? :
152 2 0 unless ($Options{'no_range_check'})
153 0 2 if $month > 11 or $month < 0
158 0 2 if $month == 1 and _is_leap_year($year)
161 0 2 if $mday > $md or $mday < 1
162 0 2 if $hour > 23 or $hour < 0
163 0 2 if $min > 59 or $min < 0
164 0 2 if $sec > 59 or $sec < 0
169 0 2 unless ($Options{'no_range_check'} or abs $days < $MaxDay)
171 0 0 if $days > $MaxDay
179 0 2 if $year < 0 and not _is_leap_year($year)
189 3 1 if $_[0] % 4
190 0 1 if $_[0] % 100
191 0 1 if $_[0] % 400
202 0 0 if $_[5] < 0 and not _is_leap_year($_[5])
205 0 0 unless my $zone_off = $loc_for_ref_t - $ref_t
217 0 0 if (not $dst_off and $ref_t - 3600 - _timegm(&Time::Precise::localtime($loc_t - 3600)) < 0)
226 0 0 if $dst_off > 0
231 0 0 if $s != $_[0] or $m != $_[1] or $h != $_[2]
243 0 6 unless $year =~ /^\d+$/ and $month =~ /^\d+$/ and $day =~ /^\d+$/
247 0 6 unless $year
248 0 6 if $month < 1 or $month > 12
249 0 6 if $day < 1
250 2 4 if ($month == 2) { }
251 1 1 if (is_leap_year($year)) { }
252 0 1 if $day > 29
254 1 0 if $day > 28
257 2 2 if $day > $month_duration->{$month}
277 1 1 unless defined $time
278 2 0 $gmt ? :
305 0 1 if @_ % 2
306 1 0 $gm ? :
317 0 6 unless $p->{$i} =~ /^(-){0,1}\d+(\.\d+){0,1}$/
319 0 1 if $p->{'month'} < 1 or $p->{'month'} > 12
321 0 3 unless $p->{$i} >= 0 and $p->{$i} < 60
323 0 0 is_leap_year($p->{'year'}) ? :
0 1 int $p->{'month'} == 2 ? :
324 0 1 unless $p->{'day'} >= 1 and $p->{'day'} <= $max_day
325 1 0 $gm ? :