Clojureで動的キーワードを作成するには？

Question

私はこのようになりますいくつかのJSON持っている：

{"_gallery123abc": "foo" }

をしかし、それはまた次のように表示されることがあります。

{"_gallery789xyz": "foo" }

はにキーワードを作成するためのClojureでの方法はあります末尾の文字に関係なく "_gallery"値を取得できるように正規表現を受け入れますか？ ((keyword #"^_gallery") data)の行に沿った何かdataは私のJSONですか？

(-> data :response :nodes :_gallery :slides :title)のような構造をトラバースできるようにチェーン内で作業する必要があります。

Answer 1

私はそのためにいくつかのユーティリティ関数を作ることが賢明であると思います：

(defn key-like [m k] 
    (let [s (name k)] 
    (some #(when (clojure.string/starts-with? (name (key %)) s) 
      (val %)) 
      m))) 

、その後、あなたが使用することができますあなたが望んでいた、それはほとんどの方法：

user> (-> {:a {:b {:_gallery123 {:d "BOOM!"}}}} 
      :a 
      :b 
      (key-like :_gallery) 
      :d) 
;;=> "BOOM!" 

別の方法ではなく->のいくつかの機能を作ることである（012のような）、これは渡されたタイプに応じてキーを取り出すことができます。

(defn find-key [m k] 
    (if (instance? java.util.regex.Pattern k) 
    (some #(when (re-matches k (name (key %))) 
      (val %)) 
      m) 
    (get m k))) 


(defn get-in+ [m & ks] 
    (reduce (fn [curr-val k] 
      (if (nil? curr-val) (reduced nil) 
       (find-key curr-val k))) 
      m ks)) 

user> (get-in+ {:a {:b {:_gallery123asd {:d "BOOM!"}}}} 
       :a 
       :b 
       #"_gallery\d{3}\w{3}" 
       :d) 

Answer 2

正規表現に一致するキーで値を取得するには、これを試してみてください：

for(var key in data) { 
    if(/^_gallery/.test(key)) 
    ... do something with obj[key] 
}