local-lib5/lib/perl5/DateTime/TimeZone/Asia/Pyongyang.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::Pyongyang;
  11
  12 use strict;
  13
  14 use Class::Singleton;
  15 use DateTime::TimeZone;
  16 use DateTime::TimeZone::OlsonDB;
  17
  18 @DateTime::TimeZone::Asia::Pyongyang::ISA = ( 'Class::Singleton', 'DateTime::TimeZone' );
  19
  20 my $spans =
  21 [
  22     [
  23 DateTime::TimeZone::NEG_INFINITY,
  24 59611131420,
  25 DateTime::TimeZone::NEG_INFINITY,
  26 59611161600,
  27 30180,
  28 0,
  29 'LMT'
  30     ],
  31     [
  32 59611131420,
  33 60081751800,
  34 59611162020,
  35 60081782400,
  36 30600,
  37 0,
  38 'KST'
  39     ],
  40     [
  41 60081751800,
  42 60810188400,
  43 60081784200,
  44 60810220800,
  45 32400,
  46 0,
  47 'KST'
  48     ],
  49     [
  50 60810188400,
  51 60936420600,
  52 60810219000,
  53 60936451200,
  54 30600,
  55 0,
  56 'KST'
  57     ],
  58     [
  59 60936420600,
  60 61637554800,
  61 60936453000,
  62 61637587200,
  63 32400,
  64 0,
  65 'KST'
  66     ],
  67     [
  68 61637554800,
  69 61870752000,
  70 61637583600,
  71 61870780800,
  72 28800,
  73 0,
  74 'KST'
  75     ],
  76     [
  77 61870752000,
  78 DateTime::TimeZone::INFINITY,
  79 61870784400,
  80 DateTime::TimeZone::INFINITY,
  81 32400,
  82 0,
  83 'KST'
  84     ],
  85 ];
  86
  87 sub olson_version { '2009s' }
  88
  89 sub has_dst_changes { 0 }
  90
  91 sub _max_year { 2019 }
  92
  93 sub _new_instance
  94 {
  95     return shift->_init( @_, spans => $spans );
  96 }
  97
  98
  99
 100 1;
 101