| line |
true |
false |
branch |
|
66
|
1 |
52 |
unless @_ & 1 and @_ >= 3 |
|
72
|
50 |
41 |
if ($key eq 'tz_string') { } |
|
|
20 |
21 |
elsif ($key eq 'gap_policy') { } |
|
|
19 |
2 |
elsif ($key eq 'overlap_policy') { } |
|
76
|
1 |
19 |
unless defined $v and exists $ValidPolicy{$v} |
|
81
|
1 |
18 |
unless defined $v and exists $ValidPolicy{$v} |
|
90
|
1 |
47 |
unless defined $tz_string |
|
112
|
0 |
44 |
unless $str =~ /\A ([+-]?) ([0-9]{1,2}) (?: [:]([0-9]{2}) (?: [:]([0-9]{2}) )? )? \z/x |
|
115
|
2 |
40 |
unless $h <= 24 and $m <= 59 and $s <= 59 |
|
118
|
8 |
32 |
$1 eq '-' ? : |
|
123
|
0 |
33 |
unless $str =~ /\A ([+-]?) ([0-9]{1,3}) (?: [:]([0-9]{2}) (?: [:]([0-9]{2}) )? )? \z/x |
|
126
|
2 |
30 |
unless $h <= 167 and $m <= 59 and $s <= 59 |
|
129
|
1 |
29 |
$1 eq '-' ? : |
|
135
|
33 |
17 |
defined $time_str ? : |
|
137
|
0 |
47 |
unless $rule_str =~ /$Rule_Rx/x |
|
140
|
34 |
13 |
if (exists $+{'month'}) { } |
|
|
6 |
7 |
elsif (exists $+{'jday'}) { } |
|
142
|
2 |
32 |
unless $m >= 1 and $m <= 12 |
|
144
|
10 |
22 |
$w == 5 ? : |
|
150
|
2 |
4 |
unless $jday >= 1 and $jday <= 365 |
|
156
|
1 |
6 |
unless $nday >= 0 and $nday <= 365 |
|
165
|
5 |
42 |
unless $str =~ /$POSIX_TZ_Rx/x |
|
173
|
0 |
39 |
unless $std_offset >= -86400 and $std_offset <= 86400 |
|
178
|
9 |
30 |
unless defined $m{'dst_name'} |
|
184
|
2 |
28 |
defined $m{'dst_offset'} ? : |
|
186
|
0 |
29 |
unless $dst_offset >= -86400 and $dst_offset <= 86400 |
|
200
|
19 |
2 |
if ($t0 <= $t1) { } |
|
231
|
2 |
39 |
if ($r->{'type'} eq 'M' and $r->{'month'} == 12) { } |
|
|
3 |
65 |
elsif ($r->{'type'} ne 'M' and $r->{'day'} >= 359) { } |
|
232
|
2 |
0 |
$r->{'nth'} == -1 ? : |
|
237
|
5 |
36 |
if (defined $max_day) |
|
238
|
3 |
2 |
if $r->{'time'} - $off >= (32 - $max_day) * 86400 |
|
243
|
1 |
40 |
if ($r->{'type'} eq 'M' and $r->{'month'} == 1) { } |
|
|
2 |
68 |
elsif ($r->{'type'} ne 'M' and $r->{'day'} <= 7) { } |
|
244
|
0 |
1 |
$r->{'nth'} == -1 ? : |
|
249
|
3 |
38 |
if (defined $min_day) |
|
250
|
1 |
2 |
if $r->{'time'} - $off < -($min_day - 1) * 86400 |
|
253
|
4 |
37 |
if $cross_year |
|
265
|
228 |
70 |
if ($rule->{'type'} eq 'M') { } |
|
|
12 |
58 |
elsif ($rule->{'type'} eq 'J') { } |
|
271
|
7 |
5 |
if $doy >= 60 and leap_year($year) |
|
276
|
0 |
58 |
if $doy == 366 and not leap_year($year) |
|
301
|
22 |
62 |
$self->{'cross_year'} ? : |
|
303
|
121 |
7 |
if ($t_start <= $t_end) { } |
|
317
|
11 |
57 |
unless exists $self->{'dst_start'} |
|
325
|
1 |
58 |
unless @_ == 2 |
|
331
|
1 |
10 |
unless @_ == 2 |
|
337
|
0 |
30 |
unless @_ >= 2 |
|
343
|
0 |
4 |
unless @_ >= 2 |
|
349
|
0 |
34 |
unless (@_ & 1) == 0 and @_ >= 2 |
|
355
|
6 |
14 |
if ($key eq 'gap_policy') { } |
|
|
12 |
2 |
elsif ($key eq 'overlap_policy') { } |
|
356
|
1 |
5 |
unless defined $v and exists $ValidPolicy{$v} |
|
361
|
1 |
11 |
unless defined $v and exists $ValidPolicy{$v} |
|
370
|
3 |
27 |
unless exists $self->{'dst_start'} |
|
374
|
0 |
27 |
unless @$times |
|
385
|
31 |
23 |
if ($prev_off < $next_off) { } |
|
|
23 |
0 |
elsif ($prev_off > $next_off) { } |
|
387
|
8 |
23 |
if ($prev_off <= $boundary and $boundary < $next_off) |
|
392
|
18 |
5 |
if $boundary >= $next_off |
|
396
|
13 |
10 |
if ($next_off <= $boundary and $boundary < $prev_off) |
|
401
|
2 |
8 |
if $boundary >= $prev_off |
|
404
|
0 |
0 |
if $boundary >= $prev_off |
|
414
|
7 |
14 |
if ($policy eq 'earlier') { } |
|
|
7 |
7 |
elsif ($policy eq 'later') { } |
|
|
2 |
5 |
elsif ($policy eq 'std') { } |
|
|
2 |
3 |
elsif ($policy eq 'dst') { } |
|
417
|
1 |
1 |
$prev->[1] ? : |
|
420
|
1 |
1 |
$prev->[1] ? : |