home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 May / Chip_2000-05_cd1.bin / zkuste / Perl / ActivePerl-5.6.0.613.msi / 䆊䌷䈹䈙䏵-䞅䞆䞀㡆䞃䄦䠥 / _072b3ccb8dc3a8a5c45f378df4df53a8 < prev    next >
Encoding:
Text File  |  2000-03-15  |  708 b   |  19 lines
  1. ;# timelocal.pl
  2. ;#
  3. ;# Usage:
  4. ;#    $time = timelocal($sec,$min,$hours,$mday,$mon,$year);
  5. ;#    $time = timegm($sec,$min,$hours,$mday,$mon,$year);
  6.  
  7. ;# This file has been superseded by the Time::Local library module.
  8. ;# It is implemented as a call to that module for backwards compatibility
  9. ;# with code written for perl4; new code should use Time::Local directly.
  10.  
  11. ;# The current implementation shares with the original the questionable
  12. ;# behavior of defining the timelocal() and timegm() functions in the
  13. ;# namespace of whatever package was current when the first instance of
  14. ;# C<require 'timelocal.pl';> was executed in a program.
  15.  
  16. use Time::Local;
  17.  
  18. *timelocal::cheat = \&Time::Local::cheat;
  19.