my $offset = 65;
my $date = strftime "%Y-%m-%d",
    localtime(time - $offset * 86400);

##</code><code>##

my $datetime = strftime "%Y-%m-%d %H:%M:%S",
    localtime(time - $offset * 86400);

##</code><code>##

my $offset = 65;
my $time = $offset * 86400;

my $sth = $dbh->prepare_cached(<<SQL);
select host
from log
where stamp > from_unixtime(?)
SQL
$sth->execute($time);

##</code><code>##

my $sth = $dbh->prepare_cached(<<SQL);
select host
from log
where to_days(now()) - to_days(stamp) > ?
SQL
$sth->execute(7);

##</code><code>##

my $sth = $dbh->prepare_cached(<<SQL);
select host
from log
where stamp > date_sub(now(), interval ? day)
SQL
$sth->execute(7);