[Date Prev][Date Next][Thread Prev][Thread Next]
[Search]
[Date Index]
[Thread Index]
[MacPerl] timelocal question
- To: mac-perl@iis.ee.ethz.ch (Return requested)
- Subject: [MacPerl] timelocal question
- From: "Patton, Paul B (MN10)" <Paul.B.Patton@HBC.honeywell.com>
- Date: 09 Jun 1997 15:30:48 -0500
- Alternate-Recipient: Allowed
- Content-Identifier: 05B7A339C67F8054
- Content-Return: Allowed
- Conversion: Allowed
- Disclose-Recipients: Prohibited
- Original-Encoded-Information-Types: IA5-Text
- X400-Content-Type: P2-1988 ( 22 )
- X400-MTS-Identifier: [/c=US/admd=MCI/prmd=Honeywell/; 05B7A339C67F8054-HW-MTA-MN]
- X400-Originator: Paul.B.Patton@HBC.honeywell.com
- X400-Received: by mta HW-MTA-MN in /c=US/admd=MCI/prmd=Honeywell/; Relayed; 09 Jun 1997 15:30:48 -0500
- X400-Received: by /c=US/admd=MCI/prmd=Honeywell/; Relayed; 09 Jun 1997 15:30:48 -0500
- X400-Recipients: non-disclosure;
I want to find the elapsed time between two dates. The "timelocal"
function seems ideal for this purpose, since it converts time and
date into an integer. However, I can't get it to return anything
except -1.
Others have posted to this list in the past about problems with
time integers; they have indicated that this is a problem in Perl 5.002
(I'm running MacPerl 5.002_01).
Is my problem another manifestation of this? Does anyone know of
a workaround or a technique that works?
This script demonstrates the problem:
require "timelocal.pl";
@now = localtime;
$x = timelocal( @now );
print join( ":", @now), "\nTimelocal returned: $x\n";
Thanks for your help,
-Paul- paul.b.patton@hbc.honeywell.com
***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch