Perl: how to know if 24hrs have passed?

Question

I have a timestamp field on a mysql table , i want to know if that timestamp is 24hrs old or more. What would be the best way to do that in Perl?

It would all depend on the database load, whether you use the tools on the DB or in the perl process. There are some good answers below for each. — alexmac, Mar 01 '14 at 15:59

score 3 · Answer 1 · answered Mar 01 '14 at 13:31

3

SQL that would return the timestamp 24 hours ago.

SELECT UNIX_TIMESTAMP(NOW() - INTERVAL 24 HOUR)

Now if your timestamp is < the timestamp returned by the above SQL , 24 hours have passed.

answered Mar 01 '14 at 13:31

Nishant Shrivastava

527
3
11

score 2 · Answer 2 · edited May 23 '17 at 12:20

2

The best thing is to let the database do the work. See SQL statement to select all rows from previous day for an example.

edited May 23 '17 at 12:20

Community

1
1

answered Mar 01 '14 at 08:14

choroba

231,213
25
204
289

2

This would be a better response if you just added some simple SQL as an example – Neil Lunn Mar 01 '14 at 09:49

score 1 · Accepted Answer · answered Mar 01 '14 at 08:12

1

By timestamp I am assuming it's Unix timestamp, i.e. seconds since epoch.

my $ts       = 1393662619;
my $day_24hr = 24 * 60 * 60;    ## seconds in 24 hrs

my $prev_time = time() - $day_24hr;    ## 24hours ago

if ( $ts < $prev_time ) {
    print "timestamp is 24 hour old";
}

answered Mar 01 '14 at 08:12

Pradeep

3,093
17
21

Seems a good approach but i don't get your $ts? it is a mysql data type "timestamp', the format is(i.e.) 1970-01-31 00:00:00 – user3325861 Mar 01 '14 at 08:31
it worked as desired, but i had to add code to convert mysql timestap to unix timestamp – user3325861 Mar 02 '14 at 18:12

score 0 · Answer 4 · answered Mar 01 '14 at 08:10

0

You can use localtime for that.

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($unix_timestamp);

answered Mar 01 '14 at 08:10

Chankey Pathak

21,187
12
85
133

1

And then you build the timestamp yourself? – Déjà vu Mar 01 '14 at 08:15

Perl: how to know if 24hrs have passed?

4 Answers4