home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / perl_mlb.zip / Time / tm.pm < prev   
Text File  |  1997-11-25  |  667b  |  32 lines

  1. package Time::tm;
  2. use strict;
  3.  
  4. use Class::Struct qw(struct);
  5. struct('Time::tm' => [
  6.      map { $_ => '$' } qw{ sec min hour mday mon year wday yday isdst }
  7. ]);
  8.  
  9. 1;
  10. __END__
  11.  
  12. =head1 NAME
  13.  
  14. Time::tm - internal object used by Time::gmtime and Time::localtime
  15.  
  16. =head1 SYNOPSIS
  17.  
  18. Don't use this module directly.
  19.  
  20. =head1 DESCRIPTION
  21.  
  22. This module is used internally as a base class by Time::localtime And
  23. Time::gmtime functions.  It creates a Time::tm struct object which is
  24. addressable just like's C's tm structure from F<time.h>; namely with sec,
  25. min, hour, mday, mon, year, wday, yday, and isdst.
  26.  
  27. This class is an internal interface only. 
  28.  
  29. =head1 AUTHOR
  30.  
  31. Tom Christiansen
  32.