Branch Coverage

lib/Date/Manip/TZ_Base.pm
Criterion Covered Total %
branch 81 110 73.6


line true false branch
29 6 8224 if $var eq "ignore"
33 384 7840 if ($istz and $var eq 'tz' || $var eq 'forcedate' || $var eq 'setdate' || $var eq 'configfile') { }
37 0 384 if ($var eq "tz")
44 333 7507 $istz ? :
54 0 27 unless $file
56 0 27 unless (-f $file)
60 0 27 unless (-r $file)
66 0 27 unless ($in->open($file))
80 675 504 if not $line or $line =~ /^\043/o
82 27 477 if ($line =~ /^\*/o) { }
95 27 0 $istz ? :
97 24 3 if (exists $sect{'holidays'})
103 210 15 if $hol
106 24 0 if (@nam)
124 27 0 $istz ? :
129 0 27 unless (exists $base->{'data'}{'sections'}{$sect})
140 477 0 $istz ? :
143 477 0 if ($line =~ /^\s*(.*?)\s*=\s*(.*?)\s*$/o) { }
149 224 253 if ($sect eq 'conf') { }
173 229 46928 if (defined $val)
181 46928 0 if (exists $self->{'data'}{'sections'}{$sect}{$var}) { }
194 2646 19 $istz ? :
198 2409 256 if length $y == 4
199 0 256 if length $y != 2
202 241 15 if (ref $self eq 'Date::Manip::TZ') { }
209 3 253 if ($method eq 'c') { }
3 250 elsif ($method =~ /^c(\d\d)$/) { }
2 248 elsif ($method =~ /^c(\d\d)(\d\d)$/) { }
216 1 1 $y < $2 ? :
223 46 202 if ($y < $y1)
226 0 248 if ($y > $y2)
275 12980 0 $istz ? :
280 5600 7380 unless (defined $noupdate)
281 0 5600 if ($op =~ /(?:now|time)/) { }
287 4 12976 unless exists $base->{'data'}{'now'}{'date'}
288 1212 11768 unless $noupdate
293 5574 7406 @tmpnow ? :
295 10698 2282 if ($op eq 'tz') { }
0 2282 elsif ($op eq 'systz') { }
436 1846 elsif ($op eq 'isdst') { }
0 1846 elsif ($op eq 'offset') { }
0 1846 elsif ($op eq 'abb') { }
194 1652 elsif ($op eq 'now') { }
1519 133 elsif ($op eq 'y') { }
16 117 elsif ($op eq 'time') { }
61 56 elsif ($op eq 'm') { }
56 0 elsif ($op eq 'd') { }
0 0 elsif ($op eq 'h') { }
0 0 elsif ($op eq 'mn') { }
0 0 elsif ($op eq 's') { }
296 10688 10 if (exists $base->{'data'}{'now'}{'tz'}) { }
347 2223 0 $istz ? :
350 2219 4 if $base->{'data'}{'now'}{'force'}
357 0 4 if ($base->{'data'}{'now'}{'set'})
391 4 0 if (ref $self eq "Date::Manip::TZ")