Branch Coverage

blib/lib/Time/C.pm
Criterion Covered Total %
branch 279 428 65.1


line true false branch
24 0 536 if @_ < 1
0 536 if @_ > 8
41 3 533 unless (defined $year)
49 498 35 unless (defined $tz)
51 10 523 if ($tz ne 'UTC' and $tz ne 'GMT')
64 0 320 if @_ < 1
0 320 if @_ > 1 and (@_ - 1) % 2
0 320 if keys %{__rest}
86 9 311 if (defined $epoch) { }
300 11 elsif (defined $year) { }
89 7 2 if (defined $tz) { }
2 0 elsif (defined $offset) { }
99 14 286 if (defined $month) { }
277 9 elsif (defined $week) { }
3 6 elsif (defined $yday) { }
100 9 5 if (defined $mday) { }
110 164 113 if (defined $wday) { }
119 7 293 if (defined $hour)
120 7 293 if (defined $minute)
121 7 293 if (defined $second)
125 1 10 if (defined $month) { }
1 9 elsif (defined $week) { }
1 8 elsif (defined $yday) { }
126 0 1 if (defined $mday) { }
133 0 1 if (defined $hour)
134 0 1 if (defined $minute)
135 0 1 if (defined $second)
141 0 1 if (defined $wday) { }
145 0 1 if (defined $hour)
146 0 1 if (defined $minute)
147 0 1 if (defined $second)
152 0 1 if (defined $hour)
153 0 1 if (defined $minute)
154 0 1 if (defined $second)
165 3 2 unless defined $hour or defined $minute or defined $second
171 2 3 if (defined $hour) { }
172 2 3 if (defined $minute) { }
2 1 elsif (not defined $hour) { }
173 3 2 if (defined $second)
180 1 307 if (defined $tz) { }
0 307 elsif (defined $offset) { }
191 0 671 if @_ < 2
0 671 if @_ > 3
1 670 if @_ < 2
206 28 643 unless defined $tz
212 0 103 if @_ < 2
0 103 if @_ > 2
215 0 28 if @_ < 1
0 28 if @_ > 2
3 25 if @_ < 1
218 0 6 if @_ < 1
0 6 if @_ > 1
221 0 10 if @_ < 2
0 10 if @_ > 2 and (@_ - 2) % 2
1 9 exists ${__rest}{'locale'} ? :
0 10 exists ${__rest}{'strict'} ? :
0 10 exists ${__rest}{'tz'} ? :
0 10 if keys %{__rest}
228 0 181 if @_ < 3
0 181 if @_ > 3 and (@_ - 3) % 2
6 175 exists ${__rest}{'locale'} ? :
0 181 exists ${__rest}{'strict'} ? :
0 181 if keys %{__rest}
230 10 171 if (ref $c)
232 4 6 if ($t->{'year'})
233 7 3 if ($t->{'month'})
234 5 5 if ($t->{'mday'})
235 3 7 if ($t->{'week'})
236 3 7 if ($t->{'wday'})
237 2 8 if ($t->{'yday'})
238 8 2 if ($t->{'hour'})
239 8 2 if ($t->{'minute'})
240 8 2 if ($t->{'second'})
241 2 8 if ($t->{'tz_d'})
242 0 10 if ($t->{'offset'})
246 10 171 if (ref $c) { }
249 2 8 if (defined $struct{'tz'}) { }
0 8 elsif (defined $struct{'offset'}) { }
255 0 10 if (defined $struct{'epoch'})
257 6 4 if (defined $struct{'year'})
259 9 1 if (defined $struct{'month'}) { }
1 0 elsif (defined $struct{'week'}) { }
0 0 elsif (defined $struct{'yday'}) { }
261 7 2 if (defined $struct{'mday'})
264 1 0 if (defined $struct{'wday'})
269 10 0 if (defined $struct{'hour'})
270 10 0 if (defined $struct{'minute'})
271 10 0 if (defined $struct{'second'})
279 0 706 if @_ < 1
0 706 if @_ > 1
313 0 4 if @_ < 1
0 4 if @_ > 1
314 1 3 unless $offset
316 3 0 if defined $tz_offset{$offset}
321 0 0 if ($hour < 0)
326 0 13 if @_ < 1
0 13 if @_ > 3 and (@_ - 3) % 2
0 13 if @_ < 3
13 0 exists ${__rest}{'locale'} ? :
13 0 exists ${__rest}{'strict'} ? :
0 13 if keys %{__rest}
327 4 9 if (defined $format)
330 4 0 if $e
336 0 9 unless defined $tm
342 7 2 if ($offset == 'Time::Zone::Olson'->new({'timezone', $tz})->local_offset($epoch))
351 0 958 if @_ < 1
0 958 if @_ > 2
359 0 2 if defined $new_epoch
363 0 958 if defined $new_epoch
369 0 35 if @_ < 1
0 35 if @_ > 3
10 25 if @_ < 2
373 25 10 if ($override)
381 25 10 if defined $new_tz
385 25 10 if defined $new_tz
390 0 784 if @_ < 2
0 784 if @_ > 2
394 0 784 unless (defined $offset)
395 0 0 if ($tz =~ /^([+-])(\d+):(\d+)$/)
398 0 0 if $sign eq '-'
402 0 784 unless defined $offset
409 0 58 if @_ < 1
0 58 if @_ > 2
414 0 4 if defined $new_offset
418 0 58 if defined $new_offset
426 0 7354 if @_ < 1
0 7354 if @_ > 2
431 0 1 if defined $new_tm
435 0 7354 if defined $new_tm
440 0 9788 if @_ < 1
0 9788 if @_ > 2
441 0 9788 unless defined $t->{'tz'}
446 0 2434 if defined $new_tm
450 0 9788 if defined $new_tm
454 44 9744 if ($t->{'tz'} ne 'GMT' and $t->{'tz'} ne 'UTC')
463 0 748 if @_ < 1
465 1 747 if (@args % 2)
467 19 729 if exists $args{'format'}
468 5 743 if exists $args{'locale'}
469 1 747 if exists $args{'strict'}
470 0 748 if %args
472 0 748 unless defined $t->{'tz'}
477 0 3 if (defined $struct{'tz'}) { }
0 3 elsif (defined $struct{'offset'}) { }
483 0 3 if (defined $struct{'epoch'})
485 3 0 if (defined $struct{'year'})
487 2 1 if (defined $struct{'month'}) { }
1 0 elsif (defined $struct{'week'}) { }
0 0 elsif (defined $struct{'yday'}) { }
489 2 0 if (defined $struct{'mday'})
492 1 0 if (defined $struct{'wday'})
497 0 3 if (defined $struct{'hour'})
498 0 3 if (defined $struct{'minute'})
499 0 3 if (defined $struct{'second'})
501 1 2 if defined $new_str
505 1 747 if defined $new_str
508 18 729 if (defined $format) { }
518 0 20 if @_ < 1
521 0 573 if @_ < 1
0 573 if @_ > 2
528 0 70 if defined $new_year
532 0 573 if defined $new_year
538 0 6 if @_ < 1
0 6 if @_ > 2
545 0 5 if defined $new_quarter
549 0 6 if defined $new_quarter
555 0 277 if @_ < 1
0 277 if @_ > 2
562 0 220 if defined $new_month
566 0 277 if defined $new_month
572 0 1028 if @_ < 1
0 1028 if @_ > 2
579 278 45 if defined $new_week
583 278 750 if defined $new_week
589 0 651 if @_ < 1
0 651 if @_ > 2
592 0 657 if @_ < 1
0 657 if @_ > 2
599 0 601 if defined $new_day
603 0 657 if defined $new_day
609 0 735 if @_ < 1
0 735 if @_ > 2
616 167 5 if defined $new_day
620 167 568 if defined $new_day
626 0 3 if @_ < 1
0 3 if @_ > 2
633 0 2 if defined $new_day
637 0 3 if defined $new_day
643 0 2371 if @_ < 1
0 2371 if @_ > 2
650 440 438 if defined $new_day
654 440 1931 if defined $new_day
660 0 110 if @_ < 1
0 110 if @_ > 2
667 0 64 if defined $new_hour
671 0 110 if defined $new_hour
677 0 102 if @_ < 1
0 102 if @_ > 2
684 0 60 if defined $new_minute
688 0 102 if defined $new_minute
694 0 68 if @_ < 1
0 68 if @_ > 2
701 2 25 if defined $new_second
705 2 66 if defined $new_second
711 0 13 if @_ < 1
0 13 if @_ > 2
718 8 3 if defined $new_second
722 8 5 if defined $new_second
729 0 1 if @_ < 2
0 1 if @_ > 2
730 1 0 $t2->can('epoch') ? :
1 0 ref $t2 ? :
740 0 539 if @_ < 1
0 539 if @_ > 1