How do I find the smallest epoch time that is in today (local timezone) with Perl? -
perl time function great, how find smallest epoch value that's in today? since epoch in seconds imagine there many epoch values correspond given day. how find lowest in timezone?
it's not supported use of timelocal
, should have no problem using information want.
use time::local qw( timelocal ); $epoch = timelocal(0,0,0, (localtime)[3,4,5]);
- i don't know of time zone day 2 midnights, can't test that.
- i tested time zone day no midnight (2013-10-20 in america/sao_paulo), , worked fine.
Comments
Post a Comment