$sth=$dbh->prepare(select ....);
$sth->execute;
$res=$sth->fetchrow_hashref;
$$res{is_complete}=defined($$res_{date_completed});