$sth = $dbh -> prepare (qq~select One, Two, Three, Four, Five from FanRatings where Title = ?~) or die $DBI::errstr;
$sth -> execute ($filename);