如何在Clojure中链接函数调用?
想象一下,我有一个字符串,我想按如下方式转换:
- 删除所有空格。
- 删除所有点。
- 使字符串小写。
一种方法是这样的:
(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以便
- 的输出
(clojure.string/replace s " " "")被馈送到 (clojure.string/replace clean-string1 "." "")并且它的输出被馈送到(clojure.string/lower-case clean-string2)
这样我就不需要中间变量clean-string1和clean-string2?
回答
您只需按照使用任何语言的方式进行操作即可。您要求函数组合,在数学或非 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))
这是同一件事,只是->为了清楚起见,只是用来稍微调整一下表格。