DBI syntax

[user2base]

I want to delete entries in a mysql table for which timestamp is older than 1 Hour. The mysql syntax is:

DELETE from table WHERE t < DATE_SUB(NOW(), INTERVAL 1 HOUR);

This works fine but I can't get it running through a perl DBI command. The following for instance does not work:

$dbh->do(&quot;DELETE from table WHERE t < DATE_SUB(NOW(), INTERVAL 1 HOUR)&quot;

Any idea ?

 

[Haunter]

#This should work fine as long as you are connected to the database.

$sth=$dbh->prepare (qq{
DELETE from table WHERE t < DATE_SUB(NOW(), INTERVAL 1 HOUR)
} );
$sth->execute ();

 

[user2base]

Thanks. It works.

 

[Haunter]

No problem!