| line |
true |
false |
branch |
|
33
|
0 |
4 |
if (eval {
do {
require Time::TZOffset;
1
}
}) |
|
109
|
4 |
80 |
exists $ENV{'TZ'} && $ENV{'TZ'} =~ /^(?:GMT|UTC)$/ ? : |
|
116
|
4 |
20 |
if exists $ENV{'TZ'} and $ENV{'TZ'} =~ /^(?:GMT|UTC)$/ |
|
127
|
676 |
20 |
unless $offset2zone[$i] eq $diff1 and $offset2zone[$i + 3] eq $diff2 |
|
128
|
14 |
6 |
$diff2 eq $diff ? : |
|
131
|
0 |
0 |
if ($diff =~ /^([+-])(\d\d)$/) |
|
132
|
0 |
0 |
$1 eq '-' ? : |
|
150
|
0 |
0 |
$year % 4 == 0 && ($year % 100 != 0 || $year % 400 == 0) ? : |
|
156
|
0 |
0 |
$t[5] < 0 ? : |
|
160
|
0 |
0 |
if ($days < 0) { } |
|
167
|
0 |
0 |
if ($d >= 0) |
|
311
|
4 |
0 |
if (exists $FORMAT_CHARS{$1} and not exists $SPRINTF_CHARS{$1}) |
|
315
|
0 |
3 |
unless ($disable_sprintf) |
|
336
|
2 |
1 |
if ($need9char) |
|
352
|
0 |
3 |
if $@ |
|
353
|
0 |
3 |
wantarray ? : |