File Coverage

blib/lib/DateTime/TimeZone/Pacific/Kanton.pm
Criterion Covered Total %
statement 21 22 95.4
branch n/a
condition n/a
subroutine 9 10 90.0
pod 1 2 50.0
total 31 34 91.1


line stmt bran cond sub pod time code
1             # This file is auto-generated by the Perl DateTime Suite time zone
2             # code generator (0.08) This code generator comes with the
3             # DateTime::TimeZone module distribution in the tools/ directory
4              
5             #
6             # Generated from /tmp/IIA7keyKs7/australasia. Olson data version 2026a
7             #
8             # Do not edit this file directly.
9             #
10             package DateTime::TimeZone::Pacific::Kanton;
11              
12 3     3   2493 use strict;
  3         10  
  3         130  
13 3     3   17 use warnings;
  3         9  
  3         211  
14 3     3   23 use namespace::autoclean;
  3         36  
  3         28  
15              
16             our $VERSION = '2.67';
17              
18 3     3   437 use Class::Singleton 1.03;
  3         64  
  3         96  
19 3     3   19 use DateTime::TimeZone;
  3         6  
  3         104  
20 3     3   18 use DateTime::TimeZone::OlsonDB;
  3         5  
  3         922  
21              
22             @DateTime::TimeZone::Pacific::Kanton::ISA = ( 'Class::Singleton', 'DateTime::TimeZone' );
23              
24             my $spans =
25             [
26             [
27             DateTime::TimeZone::NEG_INFINITY, # utc_start
28             61115212800, # utc_end 1937-08-31 00:00:00 (Tue)
29             DateTime::TimeZone::NEG_INFINITY, # local_start
30             61115212800, # local_end 1937-08-31 00:00:00 (Tue)
31             0,
32             0,
33             '-00',
34             ],
35             [
36             61115212800, # utc_start 1937-08-31 00:00:00 (Tue)
37             62443310400, # utc_end 1979-10-01 12:00:00 (Mon)
38             61115169600, # local_start 1937-08-30 12:00:00 (Mon)
39             62443267200, # local_end 1979-10-01 00:00:00 (Mon)
40             -43200,
41             0,
42             '-12',
43             ],
44             [
45             62443310400, # utc_start 1979-10-01 12:00:00 (Mon)
46             62924554800, # utc_end 1994-12-31 11:00:00 (Sat)
47             62443270800, # local_start 1979-10-01 01:00:00 (Mon)
48             62924515200, # local_end 1994-12-31 00:00:00 (Sat)
49             -39600,
50             0,
51             '-11',
52             ],
53             [
54             62924554800, # utc_start 1994-12-31 11:00:00 (Sat)
55             DateTime::TimeZone::INFINITY, # utc_end
56             62924601600, # local_start 1995-01-01 00:00:00 (Sun)
57             DateTime::TimeZone::INFINITY, # local_end
58             46800,
59             0,
60             '+13',
61             ],
62             ];
63              
64 4     4 0 15 sub olson_version {'2026a'}
65              
66 0     0 1 0 sub has_dst_changes {0}
67              
68 3     3   29 sub _max_year {2036}
69              
70             sub _new_instance {
71 3     3   59 return shift->_init( @_, spans => $spans );
72             }
73              
74              
75              
76             1;
77