long time no perl... fixed syntax of last change
fixed quotes in get_search_str function in respect to dbh->quote