line |
true |
false |
branch |
25
|
4 |
0 |
$ENV{'TZ'} ? : |
|
4 |
0 |
defined $ENV{'TZ'} ? : |
|
4 |
0 |
unless $TZ |
32
|
1 |
3 |
unless (defined $isdst) |
34
|
0 |
1 |
unless defined $time |
38
|
0 |
4 |
if (defined $Time::Timezone::tzn_cache{$TZ}[$isdst]) |
42
|
4 |
0 |
if ($TZ =~ /^
( [^:\d+\-,] {3,} )
( [+-] ?
\d {1,2}
( : \d {1,2} ) {0,2}
)
( [^\d+\-,] {3,} )?
/x) { } |
51
|
1 |
3 |
$isdst ? : |
63
|
0 |
246 |
unless defined $time |
83
|
135 |
111 |
if ($l[7] == $g[7]) { } |
|
4 |
107 |
elsif ($l[7] == $g[7] + 1) { } |
|
102 |
5 |
elsif ($l[7] == $g[7] - 1) { } |
|
0 |
5 |
elsif ($l[7] < $g[7]) { } |
249
|
0 |
166 |
unless $zone |
251
|
0 |
166 |
unless defined $time |
257
|
0 |
166 |
if ($zone =~ /^([\-\+]\d{3,4})$/) { } |
|
126 |
40 |
elsif (exists $Time::Timezone::dstZone{$zone} and $dst || !exists $Time::Timezone::Zone{$zone}) { } |
|
40 |
0 |
elsif (exists $Time::Timezone::Zone{$zone}) { } |
258
|
0 |
0 |
$1 < 0 ? : |
273
|
0 |
0 |
unless defined $time |
277
|
0 |
0 |
if (exists $Time::Timezone::dstZoneOff{$off} and $dst || !exists $Time::Timezone::zoneOff{$off}) { } |
|
0 |
0 |
elsif (exists $Time::Timezone::zoneOff{$off}) { } |