local-lib5/lib/perl5/DateTime/TimeZone/Asia/Tokyo.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::Tokyo;
  11
  12 use strict;
  13
  14 use Class::Singleton;
  15 use DateTime::TimeZone;
  16 use DateTime::TimeZone::OlsonDB;
  17
  18 @DateTime::TimeZone::Asia::Tokyo::ISA = ( 'Class::Singleton', 'DateTime::TimeZone' );
  19
  20 my $spans =
  21 [
  22     [
  23 DateTime::TimeZone::NEG_INFINITY,
  24 59547970800,
  25 DateTime::TimeZone::NEG_INFINITY,
  26 59548004339,
  27 33539,
  28 0,
  29 'LMT'
  30     ],
  31     [
  32 59547970800,
  33 59800431600,
  34 59548003200,
  35 59800464000,
  36 32400,
  37 0,
  38 'JST'
  39     ],
  40     [
  41 59800431600,
  42 61125807600,
  43 59800464000,
  44 61125840000,
  45 32400,
  46 0,
  47 'CJT'
  48     ],
  49     [
  50 61125807600,
  51 61451888400,
  52 61125840000,
  53 61451920800,
  54 32400,
  55 0,
  56 'JST'
  57     ],
  58     [
  59 61451888400,
  60 61463289600,
  61 61451924400,
  62 61463325600,
  63 36000,
  64 1,
  65 'JDT'
  66     ],
  67     [
  68 61463289600,
  69 61480918800,
  70 61463322000,
  71 61480951200,
  72 32400,
  73 0,
  74 'JST'
  75     ],
  76     [
  77 61480918800,
  78 61494739200,
  79 61480954800,
  80 61494775200,
  81 36000,
  82 1,
  83 'JDT'
  84     ],
  85     [
  86 61494739200,
  87 61515392400,
  88 61494771600,
  89 61515424800,
  90 32400,
  91 0,
  92 'JST'
  93     ],
  94     [
  95 61515392400,
  96 61526188800,
  97 61515428400,
  98 61526224800,
  99 36000,
 100 1,
 101 'JDT'
 102     ],
 103     [
 104 61526188800,
 105 61546842000,
 106 61526221200,
 107 61546874400,
 108 32400,
 109 0,
 110 'JST'
 111     ],
 112     [
 113 61546842000,
 114 61557638400,
 115 61546878000,
 116 61557674400,
 117 36000,
 118 1,
 119 'JDT'
 120     ],
 121     [
 122 61557638400,
 123 DateTime::TimeZone::INFINITY,
 124 61557670800,
 125 DateTime::TimeZone::INFINITY,
 126 32400,
 127 0,
 128 'JST'
 129     ],
 130 ];
 131
 132 sub olson_version { '2009s' }
 133
 134 sub has_dst_changes { 4 }
 135
 136 sub _max_year { 2019 }
 137
 138 sub _new_instance
 139 {
 140     return shift->_init( @_, spans => $spans );
 141 }
 142
 143
 144
 145 1;
 146