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