1 package Time::localtime;
7 use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $VERSION);
8 @ISA = qw(Exporter Time::tm);
9 @EXPORT = qw(localtime ctime);
11 $tm_sec $tm_min $tm_hour $tm_mday
12 $tm_mon $tm_year $tm_wday $tm_yday
15 %EXPORT_TAGS = ( FIELDS => [ @EXPORT_OK, @EXPORT ] );
22 my $tmob = Time::tm->new();
24 $tm_sec, $tm_min, $tm_hour, $tm_mday,
25 $tm_mon, $tm_year, $tm_wday, $tm_yday,
31 sub localtime (;$) { populate CORE::localtime(@_ ? shift : time)}
32 sub ctime (;$) { scalar CORE::localtime(@_ ? shift : time) }
40 Time::localtime - by-name interface to Perl's built-in localtime() function
45 printf "Year is %d\n", localtime->year() + 1900;
51 $date_string = ctime(stat($file)->mtime);
55 This module's default exports override the core localtime() function,
56 replacing it with a version that returns "Time::tm" objects.
57 This object has methods that return the similarly named structure field
58 name from the C's tm structure from F<time.h>; namely sec, min, hour,
59 mday, mon, year, wday, yday, and isdst.
61 You may also import all the structure fields directly into your namespace
62 as regular variables using the :FIELDS import tag. (Note that this still
63 overrides your core functions.) Access these fields as
64 variables named with a preceding C<tm_> in front their method names.
65 Thus, C<$tm_obj-E<gt>mday()> corresponds to $tm_mday if you import
68 The ctime() function provides a way of getting at the
69 scalar sense of the original CORE::localtime() function.
71 To access this functionality without the core overrides,
72 pass the C<use> an empty import list, and then access
73 function functions with their full qualified names.
74 On the other hand, the built-ins are still available
75 via the C<CORE::> pseudo-package.
79 While this class is currently implemented using the Class::Struct
80 module to build a struct-like class, you shouldn't rely upon this.