Branch Coverage

blib/lib/Time/Moment/Epoch.pm
Criterion Covered Total %
branch 25 48 52.0


line true false branch
103 0 1 if $month < 1 or $month > 12
106 0 1 if $day < 1 or $day > 31
109 0 1 if $hour < 0 or $hour > 23
112 0 1 if $minute < 0 or $minute > 60
115 0 1 if $second < 0 or $second > 60
130 1 0 if (ref $tm ne "Time::Moment")
149 0 1 unless &looks_like_number($n)
155 0 1 if $months < $MIN_UNIT_MONTHS or $months > $MAX_UNIT_MONTHS
167 1 0 if (ref $tm ne "Time::Moment")
186 0 4 unless &looks_like_number($days)
192 0 4 if $intdays < $MIN_UNIT_DAYS or $intdays > $MAX_UNIT_DAYS
203 2 0 if (ref $tm ne "Time::Moment")
240 0 2 unless my $d_days = unpack("d", $bytes)
242 0 2 if $d_days eq "-nan"
251 0 1 unless my $epoch = pack("d", $icq)
322 1 0 if ($num =~ /^[0-9a-fA-F]{32}$/)
327 0 1 if $bigint eq "NaN"
331 0 1 if length $hex > 32
332 0 1 if length $hex < 0
350 0 1 unless $wst{'year'} >= 1601 and $wst{'year'} <= 30827 and $wst{'month'} >= 1 and $wst{'month'} <= 12 and $wst{'day_of_week'} >= 0 and $wst{'day_of_week'} <= 6 and $wst{'day'} >= 1 and $wst{'day'} <= 31 and $wst{'hour'} >= 0 and $wst{'hour'} <= 23 and $wst{'minute'} >= 0 and $wst{'minute'} <= 59 and $wst{'second'} >= 0 and $wst{'second'} <= 59 and $wst{'milliseconds'} >= 0 and $wst{'milliseconds'} <= 999
367 0 1 unless $tm->year >= 1601 and $tm->year <= 30827 and $tm->month >= 1 and $tm->month <= 12 and $tm->day_of_week >= 1 and $tm->day_of_week <= 7 and $tm->day_of_month >= 1 and $tm->day_of_month <= 31 and $tm->hour >= 0 and $tm->hour <= 23 and $tm->minute >= 0 and $tm->minute <= 59 and $tm->second >= 0 and $tm->second <= 59 and $tm->millisecond >= 0 and $tm->millisecond <= 999
395 1 17 unless &looks_like_number($num)
400 0 17 if $seconds < $MIN_SECONDS or $seconds > $MAX_SECONDS
412 12 0 if (ref $t ne "Time::Moment")