$sql_stmt = qq~ delete from session where (((to_days(now()) * $day_minute) + (hour(now()) * $hour_minute) + minute(now())) - ((to_days(last_req) * $day_minute) + (hour(last_req) * $hour_minute) + minute(last_req))) > $session_limit~; $sth = $dbh->prepare($sql_stmt); $sth->execute() or &error("1SQL&Couldn't execute statement: $DBI::errstr"); $sth->finish();