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 |
46936 |
if (defined $val) |
181
|
46936 |
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") |