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