Condition Coverage

blib/lib/Date/EzDate.pm
Criterion Covered Total %
condition 66 104 63.4


and 3 conditions

line !l l&&!r l&&r condition
62 1 80 0 $init and UNIVERSAL::isa($init, 'Date::EzDate')
66 1 80 0 defined $init and not $init =~ /\S/s
74 81 0 0 $class->can('preprocess_time_string') and defined $init
226 0 0 9 defined $start and defined $end
315 0 0 2 defined $start and defined $end
575 166 0 1628 $dst_adjust and defined $dst_before
166 1628 0 $dst_adjust and defined $dst_before and $dst_before != $$self{'dst'}
706 12 24 0 $key eq 'dayofmonth' and $val > daysinmonth($$self{'monthnum'}, $$self{'year'})
1001 15 9536 100 not ref $key and $key =~ /[\{\%]/
9551 0 100 not ref $key and $key =~ /[\{\%]/ and not $key =~ /$Date::EzDate::Tie::pcode/o
1224 21 61 0 $year % 4 == 0 and $year % 100 || $year % 400 == 0
1420 25 0 34 length $val and not defined $hour
1426 0 60 0 defined $val and length $val
1581 55 0 2 not $opts{'skipjustdigits'} and $str =~ /^\d+$/

or 2 conditions

line l !l condition
1654 63 0 $length ||= 2

or 3 conditions

line l !l&&r !l&&!r condition
704 1 2 1663 $key eq 'clocktime' or $key =~ /^mil(itary)?time$/
21 2 1637 $key eq 'ampm' or $key eq 'ampmlc'
23 2 1635 $key eq 'ampm' or $key eq 'ampmlc' or $key eq 'ampmuc'
2 21 9 $key eq 'monthshort' or $key eq 'monthlong'
3 2 4 $key eq 'weekdayshort' or $key eq 'weekdaylong'
5 0 4 $key eq 'weekdayshort' or $key eq 'weekdaylong' or $key eq 'dayofweekshort'
2 0 4 $key eq 'weekdayshort' or $key eq 'weekdaylong' or $key eq 'dayofweekshort' or $key eq 'dayofweeklong'
0 0 1 $key eq 'default' or $key eq 'full'
0 0 1 $key eq 'default' or $key eq 'full' or $key eq 'dayandtime'
0 1 0 $key eq 'default' or $key eq 'full' or $key eq 'dayandtime' or $key eq 'dmy'
797 5 20 0 $val eq 'am' or $val eq 'pm'
1010 114 320 435 $el =~ s/\{([^\}]+)\}/$1/ or $el =~ /$Date::EzDate::Tie::pcode/o
1142 34 40 255 $key eq 'ampm' or $key eq 'ampmlc'
1153 0 4 191 $$self{'hour'} == 0 or $$self{'hour'} == 12
1165 22 0 60 $key eq 'clocktime' or $key eq 'clocktimestrict'
1224 0 61 0 $year % 100 || $year % 400 == 0
1389 0 0 60 $val eq 'today' or $val eq 'now'
1430 38 22 0 defined $hour or defined $day
60 0 0 defined $hour or defined $day or defined $month
22 0 0 defined $hour or defined $day or defined $month or defined $year