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 method returns undef and C returns true. =head1 SUPPORT Bugs may be submitted at L. I am also usually active on IRC as 'autarch' on C. =head1 SOURCE The source code repository for DateTime-TimeZone can be found at L. =head1 AUTHOR Dave Rolsky =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 file included with this distribution. =cut