On Thu, Jun 14, 2012 at 02:05:54PM +0100, Paul LeoNerd Evans wrote:
> I am hesitant to upload this to CPAN, because -suuuurely- something like
> it already exists. I can't seem to find it though.
>
> -----
> Time::mkgmtime(3) User Contributed Perl Documentation Time::mkgmtime(3)
>
>
>
> NAME
> "Time::mkgmtime" - a UTC version of "mktime()"
>
> SYNOPSIS
> use Time::mkgmtime qw( mkgmtime );
>
> my $epoch = mkgmtime 0, 0, 0, 14, 6-1, 2012-1900;
>
> print "2012-06-14 00:00:00 UTC happened at ",
> scalar localtime($epoch), " localtime\n";
Isn't it exactly what Time::Local's timegm and timelocal do?
--
Philippe Bruhat (BooK)
The more destruction we spread, the more we destroy ourselves.
(Moral from Groo #12 (Image))
