如何使用嵌入式双引号编写 Clojure 查询

Question

我想编写一个 Clojure 查询，以便where 子句中的lnam和fnam参数被双引号引用。我需要它们双引号，因为嵌入的名称包含单引号字符，如“O'BRIEN”。

我一直在查看 Clojure 查询和在字符串中嵌入双引号的示例，但没有找到我想要的示例。

这在 lein repl

gic-cmp.core=> (def lnam "O'BRIEN")
#'gic-cmp.core/lnam
gic-cmp.core=> (str """"lnam"""")
"O'BRIEN"

但这不会在下面的查询中产生带引号的字符串。

(defn match-this-rec-with-last
    ""
    [gic-id lnam fnam search-date]
    (let [query (str (str "select g.* from gic_employees g where g.processed_date = '" search-date "' ")
                          (str "and g.gic_id = '" gic-id "' and g.last_name = ")
                          """"lnam""""
                          (str " and g.first_name = ")
                          (str """"fnam"""")
                          (str " order by g.processed_date desc "))]
      (println query)
      (j/query db
            [query])))

Answer 1

REPL 显示 str 函数的返回值，并用引号引起来。

(str """"lnam"""")

这将返回 2 个空字符串 lnam 和另外 2 个空字符串，所有字符串都带有引号。

底层字符串是 java.lang.String，在字符串中包含双引号的标准 java 方法是使用反斜杠对其进行转义。

user=> (str "test with \"quoted\" value")
"test with \"quoted\" value"
user=> (println (str "test with \"quoted\" value"))
test with "quoted" value