my $sth = $dbh->prepare(q|
   select [Today's Date] from Referrals
|);
$sth->execute();