selva has asked for the wisdom of the Perl Monks concerning the following question:
I need to compare epoch time and postgresql timestamp. In my code first i take time field from database. And get the current time using time() function.
convert the postgresql timestamp to epoch time using Time::Local module. Then subtract postgresql timestamp from current time for my purpose. Is there any way to directly compare postgresql timestamp and epoch time without using Time::Local module.
use Time::Local; $msgtime = SelectTimeFromDatabase($MRequestId); $curtime = time(); #time stamp format in database - 06/03/2009 16:37:47.08812 $msgtime =~ /^(\d+)\/(\d+)\/(\d+) (\d+):(\d+):(\d+)\..*$/; $month = $2 - 1 ; # timelocal($sec,$min,$hour,$mday,$mon,$year); $msgtime = timelocal($6,$5,$4,$1,$month,$3); return ( ($curtime - $msgtime) >= 30 ? 1 : 0 );
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Time comparison
by Anonymous Monk on Mar 06, 2009 at 14:45 UTC |