File: Pontianak.pm

package info (click to toggle)
libdatetime-timezone-perl 1%3A1.20-1%2B2010k
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 4,508 kB
  • ctags: 2,667
  • sloc: perl: 2,340; sh: 68; makefile: 5
file content (119 lines) | stat: -rw-r--r-- 1,509 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
# This file is auto-generated by the Perl DateTime Suite time zone
# code generator (0.07) This code generator comes with the
# DateTime::TimeZone module distribution in the tools/ directory

#
# Generated from /tmp/BeQtk28wzo/asia.  Olson data version 2010k
#
# Do not edit this file directly.
#
package DateTime::TimeZone::Asia::Pontianak;

use strict;

use Class::Singleton;
use DateTime::TimeZone;
use DateTime::TimeZone::OlsonDB;

@DateTime::TimeZone::Asia::Pontianak::ISA = ( 'Class::Singleton', 'DateTime::TimeZone' );

my $spans =
[
    [
DateTime::TimeZone::NEG_INFINITY,
60189496960,
DateTime::TimeZone::NEG_INFINITY,
60189523200,
26240,
0,
'LMT'
    ],
    [
60189496960,
60962776960,
60189523200,
60962803200,
26240,
0,
'PMT'
    ],
    [
60962776960,
61254462600,
60962803960,
61254489600,
27000,
0,
'WIT'
    ],
    [
61254462600,
61369628400,
61254495000,
61369660800,
32400,
0,
'JST'
    ],
    [
61369628400,
61451800200,
61369655400,
61451827200,
27000,
0,
'WIT'
    ],
    [
61451800200,
61514870400,
61451829000,
61514899200,
28800,
0,
'WIT'
    ],
    [
61514870400,
61946267400,
61514897400,
61946294400,
27000,
0,
'WIT'
    ],
    [
61946267400,
62703648000,
61946296200,
62703676800,
28800,
0,
'CIT'
    ],
    [
62703648000,
DateTime::TimeZone::INFINITY,
62703673200,
DateTime::TimeZone::INFINITY,
25200,
0,
'WIT'
    ],
];

sub olson_version { '2010k' }

sub has_dst_changes { 0 }

sub _max_year { 2020 }

sub _new_instance
{
    return shift->_init( @_, spans => $spans );
}



1;