$sth = $dbh->prepare(qq~select $rating from FanRatings where Title = ?~) or die $DBI::errstr;
$sth->execute($filename) or die $DBI::errstr;