my $sql = qq{SELECT * FROM $table WHERE (MATCH(Author) AGAINST(? IN BOOLEAN MODE)) order by Title};

my $executable = '+'. $melville . ' +' . $herman;

$ding -> execute($executable) or   die   DBI->errstr;