xref: /onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/timelocal.pl (revision 0:68f95e015346)
1*0Sstevel@tonic-gate;# timelocal.pl
2*0Sstevel@tonic-gate;#
3*0Sstevel@tonic-gate;# Usage:
4*0Sstevel@tonic-gate;#	$time = timelocal($sec,$min,$hours,$mday,$mon,$year);
5*0Sstevel@tonic-gate;#	$time = timegm($sec,$min,$hours,$mday,$mon,$year);
6*0Sstevel@tonic-gate
7*0Sstevel@tonic-gate;# This file has been superseded by the Time::Local library module.
8*0Sstevel@tonic-gate;# It is implemented as a call to that module for backwards compatibility
9*0Sstevel@tonic-gate;# with code written for perl4; new code should use Time::Local directly.
10*0Sstevel@tonic-gate
11*0Sstevel@tonic-gate;# The current implementation shares with the original the questionable
12*0Sstevel@tonic-gate;# behavior of defining the timelocal() and timegm() functions in the
13*0Sstevel@tonic-gate;# namespace of whatever package was current when the first instance of
14*0Sstevel@tonic-gate;# C<require 'timelocal.pl';> was executed in a program.
15*0Sstevel@tonic-gate
16*0Sstevel@tonic-gateuse Time::Local;
17*0Sstevel@tonic-gate
18*0Sstevel@tonic-gate*timelocal::cheat = \&Time::Local::cheat;
19