This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Deparse inverted for(;;) cond more correctly
[perl5.git] / lib / Time / tm.pm
CommitLineData
36477c24 1package Time::tm;
2use strict;
3
b75c8c73
MS
4our $VERSION = '1.00';
5
8cc95fdb 6use Class::Struct qw(struct);
36477c24 7struct('Time::tm' => [
8 map { $_ => '$' } qw{ sec min hour mday mon year wday yday isdst }
9]);
10
111;
12__END__
13
14=head1 NAME
15
2ae324a7 16Time::tm - internal object used by Time::gmtime and Time::localtime
36477c24 17
b133f4ec
RS
18=head1 SYNOPSIS
19
20Don't use this module directly.
21
36477c24 22=head1 DESCRIPTION
23
24This module is used internally as a base class by Time::localtime And
25Time::gmtime functions. It creates a Time::tm struct object which is
26addressable just like's C's tm structure from F<time.h>; namely with sec,
27min, hour, mday, mon, year, wday, yday, and isdst.
28
29This class is an internal interface only.
30
31=head1 AUTHOR
32
33Tom Christiansen