Branch Coverage

blib/lib/Time/Piece.pm
Criterion Covered Total %
branch 169 198 85.3


line true false branch
54 2 46 unless eval { do { $_[0]->isa("Time::Piece") } }
57 7 41 unless defined $time
62 3 59 unless eval { do { $_[0]->isa("Time::Piece") } }
65 6 56 unless defined $time
83 303 199 if ref $_[1] eq "ARRAY"
84 9 190 if builtin::blessed($_[1]) and $_[1]->isa("Time::Piece")
96 4 7 if ($class->_is_time_struct($time)) { }
4 3 elsif (defined $time) { }
1 2 elsif (ref $class and $class->isa(__PACKAGE__)) { }
97 2 2 $time->[10] ? :
117 308 183 if ($class->_is_time_struct($time))
118 0 308 wantarray ? :
121 53 130 $islocal ? :
125 3 180 wantarray ? :
136 32 0 if (exists $_special_exports{$method}) { }
151 0 16 if (delete $params{':override'}) { }
199 1 4 if (@_) { }
4 0 elsif (@MON_LIST) { }
214 0 3 if (@_) { }
3 0 elsif (@FULLMON_LIST) { }
238 1 1 $res > 9 ? :
255 1 4 if (@_) { }
4 0 elsif (@DAY_LIST) { }
270 0 4 if (@_) { }
4 0 elsif (@FULLDAY_LIST) { }
290 5 1 unless $time->[10]
292 1 0 if ($time->[8] == -1)
304 0 3 unless $time->[10]
323 0 3 $delta >= 0 ? :
328 588 167 if (defined $time->[9]) { }
335 58 109 $time->[10] ? :
343 60 5 @_ ? :
351 61 22 @_ ? :
359 1 2 @_ ? :
365 1 2 @_ ? :
382 6 17 if $time->[10]
408 14 15 $m > 2 ? :
409 14 15 $m > 2 ? :
435 0 9 if $self->[10]
452 3 3 $year % 4 == 0 && !($year % 100 == 0) || $year % 400 == 0 ? :
468 1 1 $_mon == 1 ? :
563 287 113 @_ ? :
566 32 368 unless $format =~ /%/
577 4 233 if (@_ >= 2 and builtin::blessed($_[1]) and $_[1]->isa('Time::Piece')) { }
1 232 elsif (@_ and builtin::blessed($_[0]) and $_[0]->isa('Time::Piece')) { }
54 178 elsif (@_ >= 2 and ref $_[1] eq 'HASH') { }
4 174 elsif (@_ and ref $_[0] eq 'HASH') { }
592 0 4 @_ ? :
594 174 0 @_ ? :
597 58 179 ref $time ? :
601 63 174 if ($opts)
603 38 25 if (exists $opts->{'defaults'})
604 8 30 if (ref $opts->{'defaults'} eq 'ARRAY') { }
14 16 elsif (ref $opts->{'defaults'} eq 'HASH') { }
12 4 elsif (builtin::blessed($opts->{'defaults'}) and $opts->{'defaults'}->isa('Time::Piece')) { }
606 1 7 unless (@{$opts->{'defaults'};} >= 8)
614 32 80 exists $opts->{'defaults'}{$_} ? :
616 5 9 if (defined $defaults->[5] and $defaults->[5] >= 1000)
632 25 0 if (exists $opts->{'islocal'} and $opts->{'islocal'})
643 4 1 if ref $_[0] and $_[0]->isa(__PACKAGE__)
645 3 2 if (@_)
653 3 1 if ref $_[0] and $_[0]->isa(__PACKAGE__)
655 2 2 if (@_)
663 2 0 if ref $_[0] and $_[0]->isa(__PACKAGE__)
665 1 1 if (@_)
673 2 0 if ref $_[0] and $_[0]->isa(__PACKAGE__)
675 1 1 if (@_)
683 4 1 if ref $_[0] and $_[0]->isa(__PACKAGE__)
685 2 3 if (@_)
692 4 1 if ref $_[0] and $_[0]->isa(__PACKAGE__)
694 2 3 if (@_)
706 28 56 if ($time->[10]) { }
717 5 0 if (builtin::blessed($rhs) and $rhs->isa("Time::Piece"))
720 0 5 $reverse ? :
731 1 16 if (shift())
745 5 11 if (builtin::blessed($rhs) and $rhs->isa('Time::Piece')) { }
766 3 19 unless (builtin::blessed($rhs) and $rhs->isa("Time::Piece"))
769 0 22 if ($reverse)
783 0 3 unless defined $num_days
791 1 52 unless defined $num_months
795 14 38 if ($final_month > 11 or $final_month < 0)
798 2 12 if ($final_month < 0 and $final_month % 12 == 0) { }
804 6 8 if $final_month < 0
822 2 21 unless exists $params{'to'}
834 2 19 unless defined $to
836 13 6 if ($params{'to'} eq "quarter")
850 0 400 $IS_WIN32 ? :
851 238 162 !($format =~ /$bad_flags/) ? :
853 196 42 if ($can_cache and exists $_format_cache->{$format})
861 884 181 unless exists $trans_map->{$flag}
866 42 162 if $can_cache
877 1065 1192 if $format =~ /\G%([a-zA-Z])/cg
879 988 204 if $format =~ /\G(.)/cg
890 0 2 if (not $locales->{'PM'} && $locales->{'AM'} or $locales->{'PM'} eq $locales->{'AM'})
898 0 2 if (not $locales->{'pm'} && $locales->{'am'} or $locales->{'pm'} eq $locales->{'am'})
912 0 2 if (@{$locales->{'weekday'};} < 7) { }
919 0 2 if (@{$locales->{'wday'};} < 7) { }
926 0 2 if (@{$locales->{'month'};} < 12) { }
932 0 2 if (@{$locales->{'mon'};} < 12) { }