Condition Coverage

blib/lib/Time/Str.pm
Criterion Covered Total %
condition 73 91 80.2


and 3 conditions

line !l l&&!r l&&r condition
656 1 6 0 $y % 4 == 0 && ($y % 100 != 0 || $y % 400 == 0)
662 45 1 6 $m == 2 and leap_year($y)
668 4 803 0 $y >= 1 && $y <= 9999 && ($m >= 1 && $m <= 12) && ($d >= 1 && ($d <= 28 || $d <= month_days($y, $m)))
675 1 0 264 $h >= 0 && $h <= 23 && $m >= 0 && $m <= 59
681 2 2 673 $h >= 0 && $h <= 23 && $m >= 0 && $m <= 59 && $s >= 0 && $s <= 60
690 0 0 41 $pivot_year >= 0 and $pivot_year <= 9899
709 0 0 22 $hour >= 1 and $hour <= 12
785 1 1 6 $pivot_year >= 0 and $pivot_year <= 9899
793 0 2 807 defined $string and $string =~ /$regexp/x
802 2 557 248 exists $r{'month'} and not $r{'month'} =~ /^[0-9]/
812 0 0 22 $r{'hour'} >= 1 and $r{'hour'} <= 12
864 779 13 2 $regexp == $RFC2616_Rx and not $r{'tz_utc'}
884 1 1 58 $precision >= 0 and $precision <= 9
1104 1 1 109 $time >= '-62135596800' and $time < '253402300800'
1117 1 1 43 $precision >= 0 and $precision <= 9
1122 1 1 20 $nanosecond >= 0 and $nanosecond <= 999999999
1127 1 1 27 $offset >= -1439 and $offset <= 1439
1135 20 52 29 not defined $nanosecond and int $time != $time
1153 1 1 25 $local_time >= '-62135596800' and $local_time <= '253402300799'

or 2 conditions

line l !l condition
727 240 25 $m //= 0
806 805 2 $r{'month'} // 1
802 5 $r{'day'} // 1
818 655 24 $r{'minute'} // 0
615 64 $r{'second'} // 0
860 10 351 $r{'tz_offset'} //= 0
894 153 0 $m //= 0
895 152 1 $s //= 0
908 58 0 $precision // 6
1138 29 0 $precision // 6
1176 41 0 $nanosecond //= 0

or 3 conditions

line l !l&&r !l&&!r condition
712 7 15 0 $meridiem eq "AM" or $meridiem eq "PM"
799 6 35 0 $pivot_year // $DefaultPivotYear
846 2 0 13 $sec != 0 or $nsec != 0
1158 49 0 50 defined $nanosecond or defined $precision