Branch Coverage

blib/lib/Log/Log4perl/DateFormat.pm
Criterion Covered Total %
branch 56 62 90.3


line true false branch
31 1 77 if ($format eq 'ABSOLUTE') { }
1 76 elsif ($format eq 'DATE') { }
1 75 elsif ($format eq 'ISO8601') { }
1 74 elsif ($format eq 'APACHE') { }
41 78 0 if ($format)
70 9 85 if ($chunk =~ /\A'(.*)'\z/) { }
1 84 elsif ($chunk =~ /'/) { }
138 0 405 if ($first eq 'G') { }
1 404 elsif ($first eq 'e') { }
61 343 elsif ($first eq 'y') { }
59 284 elsif ($first eq 'M') { }
58 226 elsif ($first eq 'd') { }
6 220 elsif ($first eq 'h') { }
63 157 elsif ($first eq 'H') { }
63 94 elsif ($first eq 'm') { }
63 31 elsif ($first eq 's') { }
5 26 elsif ($first eq 'E') { }
6 20 elsif ($first eq 'D') { }
3 17 elsif ($first eq 'a') { }
16 1 elsif ($first eq 'S') { }
0 1 elsif ($first eq 'Z') { }
155 60 1 if ($len >= 4) { }
169 5 54 if ($len >= 3) { }
53 1 elsif ($len == 2) { }
172 1 4 if ($len >= 4) { }
198 0 4 unless $_[0] % 12
227 1 4 if ($len >= 4) { }
244 0 2 $_[0] < 12 ? :
281 20 114 unless defined $msecs
285 26 108 if ($GMTIME) { }
298 739 0 if ($code) { }