7 our(@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS, $VERSION);
10 @ISA = qw(Exporter Time::tm);
11 @EXPORT = qw(gmtime gmctime);
13 $tm_sec $tm_min $tm_hour $tm_mday
14 $tm_mon $tm_year $tm_wday $tm_yday
17 %EXPORT_TAGS = ( FIELDS => [ @EXPORT_OK, @EXPORT ] );
24 my $tmob = Time::tm->new();
26 $tm_sec, $tm_min, $tm_hour, $tm_mday,
27 $tm_mon, $tm_year, $tm_wday, $tm_yday,
33 sub gmtime (;$) { populate CORE::gmtime(@_ ? shift : time)}
34 sub gmctime (;$) { scalar CORE::gmtime(@_ ? shift : time)}
41 Time::gmtime - by-name interface to Perl's built-in gmtime() function
47 printf "The day in Greenwich is %s\n",
48 (qw(Sun Mon Tue Wed Thu Fri Sat Sun))[ $gm->wday() ];
50 use Time::gmtime qw(:FIELDS);
52 printf "The day in Greenwich is %s\n",
53 (qw(Sun Mon Tue Wed Thu Fri Sat Sun))[ $tm_wday ];
59 $date_string = gmctime(stat($file)->mtime);
63 This module's default exports override the core gmtime() function,
64 replacing it with a version that returns "Time::tm" objects.
65 This object has methods that return the similarly named structure field
66 name from the C's tm structure from F<time.h>; namely sec, min, hour,
67 mday, mon, year, wday, yday, and isdst.
69 You may also import all the structure fields directly into your namespace
70 as regular variables using the :FIELDS import tag. (Note that this
71 still overrides your core functions.) Access these fields as variables
72 named with a preceding C<tm_> in front their method names. Thus,
73 C<$tm_obj-E<gt>mday()> corresponds to $tm_mday if you import the fields.
75 The gmctime() function provides a way of getting at the
76 scalar sense of the original CORE::gmtime() function.
78 To access this functionality without the core overrides,
79 pass the C<use> an empty import list, and then access
80 function functions with their full qualified names.
81 On the other hand, the built-ins are still available
82 via the C<CORE::> pseudo-package.
86 While this class is currently implemented using the Class::Struct
87 module to build a struct-like class, you shouldn't rely upon this.