Help for this page
# get the difference between two epoch times and cope with 2038 sub diff_time { ... require Math::BigInt; # blah }
my $zero_hour = 2**31 -1; print "Zero hour is $zero_hour\n"; print scalar gmtime($zero_hour), "\n"; print gmtime($zero_hour+1) ? "OK" . scalar gmtime($zero_hour+1) : 'Oh +dear!';
www.com | www.net | www.org
No recent polls found