在 clojure 中定期运行任务的最简单方法是什么

Question

我想每 10 秒执行一个函数。怎么做最简单？在core.async中有一个超时函数，最多等待那个时间，而我想要的是至少等待那个时间。

Answer 1

at-at 是我的最爱。下面的例子是从网页上复制的：

(use 'overtone.at-at)
(def my-pool (mk-pool))
(at (+ 1000 (now)) #(println "hello from the past!") my-pool)

如果您一般使用 core.async，chime 也很棒。同样，取自他们的例子：

(:require [chime :refer [chime-ch]]
          [clj-time.core :as t]
          [clojure.core.async :as a :refer [<! go-loop]])

    (let [chimes (chime-ch [(-> 2 t/secs t/from-now)
                        (-> 3 t/secs t/from-now)])]
    (a/<!! (go-loop []
           (when-let [msg (<! chimes)]
             (prn "Chiming at:" msg)
             (recur)))))

在 clojure 中定期 运行 任务的最简单方法是什么

What's the simplest way to run a task periodically in clojure

clojure

core.async

在 clojure 中定期运行任务的最简单方法是什么