1package DateTime::TimeZone::Local::VMS; 2 3use strict; 4use warnings; 5use namespace::autoclean; 6 7our $VERSION = '2.51'; 8 9use parent 'DateTime::TimeZone::Local'; 10 11sub Methods { return qw( FromEnv ) } 12 13sub EnvVars { 14 return qw( TZ SYS$TIMEZONE_RULE SYS$TIMEZONE_NAME UCX$TZ TCPIP$TZ ); 15} 16 171; 18 19# ABSTRACT: Determine the local system's time zone on VMS 20 21__END__ 22 23=pod 24 25=encoding UTF-8 26 27=head1 NAME 28 29DateTime::TimeZone::Local::VMS - Determine the local system's time zone on VMS 30 31=head1 VERSION 32 33version 2.51 34 35=head1 SYNOPSIS 36 37 my $tz = DateTime::TimeZone->new( name => 'local' ); 38 39 my $tz = DateTime::TimeZone::Local->TimeZone(); 40 41=head1 DESCRIPTION 42 43This module provides methods for determining the local time zone on a 44VMS platform. 45 46NOTE: This is basically a stub pending an implementation by someone 47who knows something about VMS. 48 49=head1 HOW THE TIME ZONE IS DETERMINED 50 51This class tries the following methods of determining the local time 52zone: 53 54=over 4 55 56=item * %ENV 57 58We check the following environment variables: 59 60=over 8 61 62=item * TZ 63 64=item * SYS$TIMEZONE_RULE 65 66=item * SYS$TIMEZONE_NAME 67 68=item * UCX$TZ 69 70=item * TCPIP$TZ 71 72=back 73 74=back 75 76=head1 SUPPORT 77 78Bugs may be submitted at L<https://github.com/houseabsolute/DateTime-TimeZone/issues>. 79 80=head1 SOURCE 81 82The source code repository for DateTime-TimeZone can be found at L<https://github.com/houseabsolute/DateTime-TimeZone>. 83 84=head1 AUTHOR 85 86Dave Rolsky <autarch@urth.org> 87 88=head1 COPYRIGHT AND LICENSE 89 90This software is copyright (c) 2021 by Dave Rolsky. 91 92This is free software; you can redistribute it and/or modify it under 93the same terms as the Perl 5 programming language system itself. 94 95The full text of the license can be found in the 96F<LICENSE> file included with this distribution. 97 98=cut 99