Condition Coverage

blib/lib/Date/Parse.pm
Criterion Covered Total %
condition 72 129 55.8


and 3 conditions

line !l l&&!r l&&r condition
241 8 0 1 defined $hh and $hh <= 12
8 1 0 defined $hh and $hh <= 12 and $dtstr =~ s/ ([ap])\.?m?\.?\s/ /o
0 0 0 length $year > 2 and $year < 1901
0 0 0 $dtstr =~ /\s(\d\d)(\d\d)(\d\d)\s/o and $2 >= 1
0 0 0 $dtstr =~ /\s(\d\d)(\d\d)(\d\d)\s/o and $2 >= 1 and $2 <= 12
0 0 9 not defined $year and $dtstr =~ s/\s(\d{2}(\d{2})?)[\s\.,]/ /o
0 0 0 $2 and $2 eq "dst"
0 0 9 defined $year and $year >= 100
9 0 0 defined $zone and $dst
245 25 253 264 defined $hh and $hh <= 12
278 262 2 defined $hh and $hh <= 12 and $dtstr =~ s/ ([ap])\.?m?\.?\s/ /o
5 9 0 length $year > 2 and $year < 1901
15 0 2 $dtstr =~ /\s(\d\d)(\d\d)(\d\d)\s/o and $2 >= 1
15 2 0 $dtstr =~ /\s(\d\d)(\d\d)(\d\d)\s/o and $2 >= 1 and $2 <= 12
19 29 409 not defined $year and $dtstr =~ s/\s(\d{2}(\d{2})?)[\s\.,]/ /o
324 0 0 $2 and $2 eq "dst"
25 157 356 defined $year and $year >= 100
58 480 0 defined $zone and $dst
292 0 0 516 $month <= 11 and $day >= 1
0 0 517 $month <= 11 and $day >= 1 and $day <= 31
0 0 516 $month <= 11 and $day >= 1 and $day <= 31 and $hh <= 23
0 0 517 $month <= 11 and $day >= 1 and $day <= 31 and $hh <= 23 and $mm <= 59
1 0 516 $month <= 11 and $day >= 1 and $day <= 31 and $hh <= 23 and $mm <= 59 and $ss <= 59
303 470 0 0 $result == -1 and join("", $ss, $mm, $hh, $day, $month, $year) ne "595923311169"
308 458 11 0 $result < 0 and $year >= 1970
317 46 0 0 $result == -1 and join("", $ss, $mm, $hh, $day, $month, $year) ne join("", (localtime -1)[0..5])
323 41 5 1 $result < 0 and $year >= 1971

or 2 conditions

line l !l condition
262 497 19 1 $hh ||= 0
263 497 20 0 $mm ||= 0
264 451 65 0 $ss ||= 0

or 3 conditions

line l !l&&r !l&&!r condition
241 1 0 8 defined $hh or defined $mm
1 0 8 defined $hh or defined $mm or defined $ss
0 8 0 defined $hh or defined $mm or defined $ss or defined $day
8 0 0 defined $hh or defined $mm or defined $ss or defined $day or defined $month
8 0 0 defined $hh or defined $mm or defined $ss or defined $day or defined $month or defined $year
245 517 0 21 defined $hh or defined $mm
517 0 21 defined $hh or defined $mm or defined $ss
0 16 5 defined $hh or defined $mm or defined $ss or defined $day
16 2 3 defined $hh or defined $mm or defined $ss or defined $day or defined $month
18 0 3 defined $hh or defined $mm or defined $ss or defined $day or defined $month or defined $year
276 8 1 12 $month > $lt[4] || $month == $lt[4] && $day > $lt[3]
303 2 0 469 not defined $result or $result == -1 and join("", $ss, $mm, $hh, $day, $month, $year) ne "595923311169"
317 0 0 46 not defined $result or $result == -1 and join("", $ss, $mm, $hh, $day, $month, $year) ne join("", (localtime -1)[0..5])