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