如何在 Clojure 中链接函数调用？

Question

假设我有一个字符串，我想按如下方式转换：

1. 删除所有空格。
2. 删除所有点。
3. 使字符串小写。

一种方法是这样的：

(defn my-function
  [s]
  (let
      [
        clean-string1 (clojure.string/replace s " " "")
        clean-string2 (clojure.string/replace clean-string1 "." "")
        clean-string3 (clojure.string/lower-case clean-string2)
       ]
    ;; ...
    )
  )

我如何“链接”函数 clojure.string/replace 和 clojure.string/lower-case 以便

1. (clojure.string/replace s " " "") 的输出被馈送到
的输入
2. (clojure.string/replace clean-string1 "." "") 和它的输出被馈送到
的输入
3. (clojure.string/lower-case clean-string2)

这样我就不需要中间变量 clean-string1 和 clean-string2？

Answer 1

您只需按照使用任何语言的方式进行操作即可。您要求函数组合，在数学或非 lisp 语言中看起来像 f(g(x))。在 lisp 中当然是 (f (g x))，但原理是一样的。

(require '[clojure.string :as s])
(s/lower-case (s/replace (s/replace s " " "") "." ""))

是最直接的答案。但是在函数名称与它们的额外参数相去甚远的情况下进行这种级别的嵌套是相当不愉快的，因此大多数人会改为编写

(-> s
    (s/replace " " "")
    (s/replace "." "")
    (s/lower-case))

这是同样的事情，但为了清楚起见，只是使用 -> 将表格打乱一点。