File Coverage

blib/lib/DateTime/TimeZone/Asia/Bangkok.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/HahUrb_roy/asia. Olson data version 2025c
7             #
8             # Do not edit this file directly.
9             #
10             package DateTime::TimeZone::Asia::Bangkok;
11              
12 3     3   2558 use strict;
  3         10  
  3         173  
13 3     3   24 use warnings;
  3         7  
  3         220  
14 3     3   22 use namespace::autoclean;
  3         9  
  3         66  
15              
16             our $VERSION = '2.66';
17              
18 3     3   438 use Class::Singleton 1.03;
  3         106  
  3         113  
19 3     3   19 use DateTime::TimeZone;
  3         8  
  3         118  
20 3     3   17 use DateTime::TimeZone::OlsonDB;
  3         7  
  3         713  
21              
22             @DateTime::TimeZone::Asia::Bangkok::ISA = ( 'Class::Singleton', 'DateTime::TimeZone' );
23              
24             my $spans =
25             [
26             [
27             DateTime::TimeZone::NEG_INFINITY, # utc_start
28             59295518276, # utc_end 1879-12-31 17:17:56 (Wed)
29             DateTime::TimeZone::NEG_INFINITY, # local_start
30             59295542400, # local_end 1880-01-01 00:00:00 (Thu)
31             24124,
32             0,
33             'LMT',
34             ],
35             [
36             59295518276, # utc_start 1879-12-31 17:17:56 (Wed)
37             60565598276, # utc_end 1920-03-31 17:17:56 (Wed)
38             59295542400, # local_start 1880-01-01 00:00:00 (Thu)
39             60565622400, # local_end 1920-04-01 00:00:00 (Thu)
40             24124,
41             0,
42             'BMT',
43             ],
44             [
45             60565598276, # utc_start 1920-03-31 17:17:56 (Wed)
46             DateTime::TimeZone::INFINITY, # utc_end
47             60565623476, # local_start 1920-04-01 00:17:56 (Thu)
48             DateTime::TimeZone::INFINITY, # local_end
49             25200,
50             0,
51             '+07',
52             ],
53             ];
54              
55 10     10 0 33 sub olson_version {'2025c'}
56              
57 0     0 1 0 sub has_dst_changes {0}
58              
59 3     3   28 sub _max_year {2035}
60              
61             sub _new_instance {
62 3     3   499 return shift->_init( @_, spans => $spans );
63             }
64              
65              
66              
67             1;
68