local-lib5/lib/perl5/DateTime/TimeZone/Asia/Kuala_Lumpur.pm

   1 # This file is auto-generated by the Perl DateTime Suite time zone
   2 # code generator (0.07) This code generator comes with the
   3 # DateTime::TimeZone module distribution in the tools/ directory
   4
   5 #
   6 # Generated from /tmp/UeJBI4pKMW/asia.  Olson data version 2009s
   7 #
   8 # Do not edit this file directly.
   9 #
  10 package DateTime::TimeZone::Asia::Kuala_Lumpur;
  11
  12 use strict;
  13
  14 use Class::Singleton;
  15 use DateTime::TimeZone;
  16 use DateTime::TimeZone::OlsonDB;
  17
  18 @DateTime::TimeZone::Asia::Kuala_Lumpur::ISA = ( 'Class::Singleton', 'DateTime::TimeZone' );
  19
  20 my $spans =
  21 [
  22     [
  23 DateTime::TimeZone::NEG_INFINITY,
  24 59958205994,
  25 DateTime::TimeZone::NEG_INFINITY,
  26 59958230400,
  27 24406,
  28 0,
  29 'LMT'
  30     ],
  31     [
  32 59958205994,
  33 60097482275,
  34 59958230919,
  35 60097507200,
  36 24925,
  37 0,
  38 'SMT'
  39     ],
  40     [
  41 60097482275,
  42 60968048400,
  43 60097507475,
  44 60968073600,
  45 25200,
  46 0,
  47 'MALT'
  48     ],
  49     [
  50 60968048400,
  51 61062655200,
  52 60968074800,
  53 61062681600,
  54 26400,
  55 1,
  56 'MALST'
  57     ],
  58     [
  59 61062655200,
  60 61241503200,
  61 61062681600,
  62 61241529600,
  63 26400,
  64 0,
  65 'MALT'
  66     ],
  67     [
  68 61241503200,
  69 61256017800,
  70 61241530200,
  71 61256044800,
  72 27000,
  73 0,
  74 'MALT'
  75     ],
  76     [
  77 61256017800,
  78 61368678000,
  79 61256050200,
  80 61368710400,
  81 32400,
  82 0,
  83 'JST'
  84     ],
  85     [
  86 61368678000,
  87 62514347400,
  88 61368705000,
  89 62514374400,
  90 27000,
  91 0,
  92 'MALT'
  93     ],
  94     [
  95 62514347400,
  96 DateTime::TimeZone::INFINITY,
  97 62514376200,
  98 DateTime::TimeZone::INFINITY,
  99 28800,
 100 0,
 101 'MYT'
 102     ],
 103 ];
 104
 105 sub olson_version { '2009s' }
 106
 107 sub has_dst_changes { 1 }
 108
 109 sub _max_year { 2019 }
 110
 111 sub _new_instance
 112 {
 113     return shift->_init( @_, spans => $spans );
 114 }
 115
 116
 117
 118 1;
 119