%PDF- <> %âãÏÓ endobj 2 0 obj <> endobj 3 0 obj <>/ExtGState<>/ProcSet[/PDF/Text/ImageB/ImageC/ImageI] >>/Annots[ 28 0 R 29 0 R] /MediaBox[ 0 0 595.5 842.25] /Contents 4 0 R/Group<>/Tabs/S>> endobj ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµùÕ5sLOšuY>endobj 2 0 obj<>endobj 2 0 obj<>endobj 2 0 obj<>endobj 2 0 obj<> endobj 2 0 obj<>endobj 2 0 obj<>es 3 0 R>> endobj 2 0 obj<> ox[ 0.000000 0.000000 609.600000 935.600000]/Fi endobj 3 0 obj<> endobj 7 1 obj<>/ProcSet[/PDF/Text/ImageB/ImageC/ImageI]>>/Subtype/Form>> stream
package DateTime::TimeZone::UTC; use strict; use warnings; use namespace::autoclean; our $VERSION = '2.18'; use parent 'Class::Singleton', 'DateTime::TimeZone'; sub new { return shift->instance; } ## no critic (Subroutines::ProhibitUnusedPrivateSubroutines) sub _new_instance { my $class = shift; return bless { name => 'UTC' }, $class; } ## use critic sub is_dst_for_datetime {0} sub offset_for_datetime {0} sub offset_for_local_datetime {0} sub short_name_for_datetime {'UTC'} sub category {undef} sub is_utc {1} 1; # ABSTRACT: The UTC time zone __END__ =pod =encoding UTF-8 =head1 NAME DateTime::TimeZone::UTC - The UTC time zone =head1 VERSION version 2.18 =head1 SYNOPSIS my $utc_tz = DateTime::TimeZone::UTC->new; =head1 DESCRIPTION This class is used to provide the DateTime::TimeZone API needed by DateTime.pm for the UTC time zone, which is not explicitly included in the Olson time zone database. The offset for this object will always be zero. =head1 USAGE This class has the same methods as a real time zone object, but the C<category()> method returns undef and C<is_utc()> returns true. =head1 SUPPORT Bugs may be submitted at L<https://github.com/houseabsolute/DateTime-TimeZone/issues>. I am also usually active on IRC as 'autarch' on C<irc://irc.perl.org>. =head1 SOURCE The source code repository for DateTime-TimeZone can be found at L<https://github.com/houseabsolute/DateTime-TimeZone>. =head1 AUTHOR Dave Rolsky <autarch@urth.org> =head1 COPYRIGHT AND LICENSE This software is copyright (c) 2018 by Dave Rolsky. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. The full text of the license can be found in the F<LICENSE> file included with this distribution. =cut