Chris wrote:
> I need to work with epoch time past the year 2038.
>
> my $time = gmtime(2147483647 + 1);
> print $time;
>
> any ideas?
try:
#!/usr/bin/perl -w
use strict;
use Date::Manip;
print "35 years and 20 minutes from now is: ",
UnixDate(ParseDate("35 years 20 minutes"),"%s"),"\n";
print "epoch 2149461226 seconds translate to: ",
UnixDate(ParseDate("epoch 2149461226"),"%m/%d/%Y %H:%M:%S"),"\n";
__END__
prints:
35 years and 20 minutes from now is: 2149462888
epoch 2149461226 seconds translate to: 02/10/2038 16:33:46
david
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
