File Coverage

blib/lib/DateTime/TimeZone/Pacific/Tahiti.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/IIA7keyKs7/australasia. Olson data version 2026a
7             #
8             # Do not edit this file directly.
9             #
10             package DateTime::TimeZone::Pacific::Tahiti;
11              
12 1     1   791 use strict;
  1         3  
  1         45  
13 1     1   7 use warnings;
  1         4  
  1         89  
14 1     1   9 use namespace::autoclean;
  1         2  
  1         9  
15              
16             our $VERSION = '2.67';
17              
18 1     1   105 use Class::Singleton 1.03;
  1         35  
  1         31  
19 1     1   7 use DateTime::TimeZone;
  1         2  
  1         40  
20 1     1   7 use DateTime::TimeZone::OlsonDB;
  1         3  
  1         219  
21              
22             @DateTime::TimeZone::Pacific::Tahiti::ISA = ( 'Class::Singleton', 'DateTime::TimeZone' );
23              
24             my $spans =
25             [
26             [
27             DateTime::TimeZone::NEG_INFINITY, # utc_start
28             60329008696, # utc_end 1912-10-01 09:58:16 (Tue)
29             DateTime::TimeZone::NEG_INFINITY, # local_start
30             60328972800, # local_end 1912-10-01 00:00:00 (Tue)
31             -35896,
32             0,
33             'LMT',
34             ],
35             [
36             60329008696, # utc_start 1912-10-01 09:58:16 (Tue)
37             DateTime::TimeZone::INFINITY, # utc_end
38             60328972696, # local_start 1912-09-30 23:58:16 (Mon)
39             DateTime::TimeZone::INFINITY, # local_end
40             -36000,
41             0,
42             '-10',
43             ],
44             ];
45              
46 1     1 0 4 sub olson_version {'2026a'}
47              
48 0     0 1 0 sub has_dst_changes {0}
49              
50 1     1   7 sub _max_year {2036}
51              
52             sub _new_instance {
53 1     1   20 return shift->_init( @_, spans => $spans );
54             }
55              
56              
57              
58             1;
59