File Coverage

blib/lib/DateTime/TimeZone/America/Puerto_Rico.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

# This file is auto-generated by the Perl DateTime Suite time zone
# code generator (0.08) This code generator comes with the
# DateTime::TimeZone module distribution in the tools/ directory

#
# Generated from /tmp/IIA7keyKs7/northamerica.  Olson data version 2026a
#
# Do not edit this file directly.
#
package DateTime::TimeZone::America::Puerto_Rico;

use strict;
use warnings;
use namespace::autoclean;

our $VERSION = '2.67';

use Class::Singleton 1.03;
use DateTime::TimeZone;
use DateTime::TimeZone::OlsonDB;

@DateTime::TimeZone::America::Puerto_Rico::ISA = ( 'Class::Singleton', 'DateTime::TimeZone' );

my $spans =
[
    [
DateTime::TimeZone::NEG_INFINITY, #    utc_start
59902647865, #      utc_end 1899-03-28 16:24:25 (Tue)
DateTime::TimeZone::NEG_INFINITY, #  local_start
59902632000, #    local_end 1899-03-28 12:00:00 (Tue)
-15865,
0,
'LMT',
    ],
    [
59902647865, #    utc_start 1899-03-28 16:24:25 (Tue)
61262625600, #      utc_end 1942-05-03 04:00:00 (Sun)
59902633465, #  local_start 1899-03-28 12:24:25 (Tue)
61262611200, #    local_end 1942-05-03 00:00:00 (Sun)
-14400,
0,
'AST',
    ],
    [
61262625600, #    utc_start 1942-05-03 04:00:00 (Sun)
61366287600, #      utc_end 1945-08-14 23:00:00 (Tue)
61262614800, #  local_start 1942-05-03 01:00:00 (Sun)
61366276800, #    local_end 1945-08-14 20:00:00 (Tue)
-10800,
1,
'AWT',
    ],
    [
61366287600, #    utc_start 1945-08-14 23:00:00 (Tue)
61370283600, #      utc_end 1945-09-30 05:00:00 (Sun)
61366276800, #  local_start 1945-08-14 20:00:00 (Tue)
61370272800, #    local_end 1945-09-30 02:00:00 (Sun)
-10800,
1,
'APT',
    ],
    [
61370283600, #    utc_start 1945-09-30 05:00:00 (Sun)
DateTime::TimeZone::INFINITY, #      utc_end
61370269200, #  local_start 1945-09-30 01:00:00 (Sun)
DateTime::TimeZone::INFINITY, #    local_end
-14400,
0,
'AST',
    ],
];

sub olson_version {'2026a'}

sub has_dst_changes {2}

sub _max_year {2036}

sub _new_instance {
    return shift->_init( @_, spans => $spans );
}



1;