| line |
true |
false |
branch |
|
26
|
0 |
0 |
unless @_ & 1 and @_ >= 3 |
|
32
|
0 |
0 |
if ($key eq 'path') { } |
|
|
0 |
0 |
elsif ($key eq 'name') { } |
|
|
0 |
0 |
elsif ($key eq 'gap_policy') { } |
|
|
0 |
0 |
elsif ($key eq 'overlap_policy') { } |
|
36
|
0 |
0 |
unless valid_tzdb_timezone($v) |
|
41
|
0 |
0 |
unless defined $v and exists $ValidPolicy{$v} |
|
46
|
0 |
0 |
unless defined $v and exists $ValidPolicy{$v} |
|
55
|
0 |
0 |
unless defined $path |
|
58
|
0 |
0 |
unless open my $fh, "<:raw", $path |
|
78
|
0 |
0 |
unless @_ == 1 |
|
83
|
0 |
0 |
unless @_ == 1 |
|
88
|
0 |
0 |
unless @_ == 1 |
|
93
|
0 |
0 |
unless @_ == 1 |
|
98
|
0 |
0 |
unless @_ == 1 |
|
103
|
0 |
0 |
unless @_ == 1 |
|
108
|
0 |
0 |
unless @_ == 2 |
|
111
|
0 |
0 |
unless valid_tzdb_timezone($name) |
|
114
|
0 |
0 |
if (not exists $self->{'name'} or $name ne $self->{'name'}) |
|
121
|
0 |
0 |
unless @_ == 2 |
|
124
|
0 |
0 |
unless defined $policy and exists $ValidPolicy{$policy} |
|
127
|
0 |
0 |
if ($policy ne $self->{'gap_policy'}) |
|
134
|
0 |
0 |
unless @_ == 2 |
|
137
|
0 |
0 |
unless defined $policy and exists $ValidPolicy{$policy} |
|
140
|
0 |
0 |
if ($policy ne $self->{'overlap_policy'}) |
|
158
|
0 |
0 |
unless defined $got |
|
160
|
0 |
0 |
unless $got == $len |
|
170
|
0 |
0 |
unless $magic == 1415211366 |
|
175
|
0 |
0 |
if ($version eq '2' or $version eq '3') { } |
|
185
|
0 |
0 |
if $v1_size |
|
190
|
0 |
0 |
unless $magic == 1415211366 |
|
200
|
0 |
0 |
unless $nl eq "\n" |
|
206
|
0 |
0 |
unless defined $byte |
|
207
|
0 |
0 |
if $byte eq "\n" |
|
210
|
0 |
0 |
if length $posix_tz |
|
218
|
0 |
0 |
if ($self->{'posix_tz'} and @$times) { } |
|
232
|
0 |
0 |
unless $typecnt >= 1 |
|
234
|
0 |
0 |
unless $timecnt <= 2400 |
|
236
|
0 |
0 |
unless $typecnt <= 256 |
|
238
|
0 |
0 |
unless $charcnt <= 256 |
|
241
|
0 |
0 |
$time_size == 8 ? : |
|
250
|
0 |
0 |
unless $idx < $typecnt |
|
259
|
0 |
0 |
unless $offset > -86400 and $offset < 86400 |
|
261
|
0 |
0 |
unless $dst == 0 or $dst == 1 |
|
263
|
0 |
0 |
unless $abbridx < $charcnt |
|
281
|
0 |
0 |
$time_size == 8 ? : |
|
283
|
0 |
0 |
if $skip |
|
293
|
0 |
0 |
unless ($type->[1]) |
|
313
|
0 |
0 |
unless @_ == 1 |
|
315
|
0 |
0 |
wantarray ? : |
|
319
|
0 |
0 |
unless @_ == 2 |
|
321
|
0 |
0 |
if ($time <= $self->{'max_time_utc'}) { } |
|
330
|
0 |
0 |
unless @_ == 2 |
|
332
|
0 |
0 |
if ($time <= $self->{'max_time_utc'}) { } |
|
342
|
0 |
0 |
unless @_ >= 2 |
|
344
|
0 |
0 |
if ($time > $self->{'max_time_local'}) |
|
352
|
0 |
0 |
unless @_ >= 2 |
|
354
|
0 |
0 |
if ($time > $self->{'max_time_local'}) |
|
362
|
0 |
0 |
unless (@_ & 1) == 0 |
|
368
|
0 |
0 |
if ($key eq 'gap_policy') { } |
|
|
0 |
0 |
elsif ($key eq 'overlap_policy') { } |
|
369
|
0 |
0 |
unless defined $v and exists $ValidPolicy{$v} |
|
374
|
0 |
0 |
unless defined $v and exists $ValidPolicy{$v} |
|
387
|
0 |
0 |
unless @$times |
|
395
|
0 |
0 |
if $lo >= $hi |
|
406
|
0 |
0 |
if ($prev_off < $next_off) { } |
|
|
0 |
0 |
elsif ($prev_off > $next_off) { } |
|
408
|
0 |
0 |
if ($prev_off <= $boundary and $boundary < $next_off) |
|
413
|
0 |
0 |
if $boundary >= $next_off |
|
417
|
0 |
0 |
if ($next_off <= $boundary and $boundary < $prev_off) |
|
422
|
0 |
0 |
if $boundary >= $prev_off |
|
425
|
0 |
0 |
if $boundary >= $prev_off |
|
435
|
0 |
0 |
if ($policy eq 'earlier') { } |
|
|
0 |
0 |
elsif ($policy eq 'later') { } |
|
|
0 |
0 |
elsif ($policy eq 'std') { } |
|
|
0 |
0 |
elsif ($policy eq 'dst') { } |
|
438
|
0 |
0 |
$prev->[1] ? : |
|
441
|
0 |
0 |
$prev->[1] ? : |