This is a library that makes working with URLs in Clojure and ClojureScript a little more pleasant.
url is available in Clojars. Add this :dependency to your Leiningen project.clj:
[com.cemerick/url "0.1.1"]
Or, add this to your Maven project's pom.xml:
<repository> <id>clojars</id> <url>http://clojars.org/repo</url> </repository> <dependency> <groupId>com.cemerick</groupId> <artifactId>url</artifactId> <version>0.1.1</version> </dependency>
Starting with version 0.1.0, url requires Clojure >= 1.5.0. It provides the same API under ClojureScript (tested with ClojureScript 0.0-1835, and should work well with any later revision).
The cemerick.url/url function returns an instance of the cemerick.url.URL record type that allows you to easily work with each datum within the provided URL:
=> (require '[cemerick.url :refer (url url-encode)])
nil
=> (-> (url "https://api.stripe.com/v1/charges")
(assoc :username "vtUQeOtUnYr7PGCLQ96Ul4zqpDUO4sOE")
str)
"https://vtUQeOtUnYr7PGCLQ96Ul4zqpDUO4sOE:@api.stripe.com/v1/charges"
url will also accept additional paths to be resolved against the path in the base URL:
=> (url "https://api.twitter.com/")
#cemerick.url.URL{:protocol "https", :username nil, :password nil,
:host "api.twitter.com", :port -1, :path "/", :query nil,
:anchor nil}
=> (url "https://api.twitter.com/" "1" "users" "profile_image" "cemerick")
#cemerick.url.URL{:protocol "https", :username nil, :password nil,
:host "api.twitter.com", :port -1,
:path "/1/users/profile_image/cemerick", :query nil, :anchor nil}
=> (str *1)
"https://api.twitter.com/1/users/profile_image/cemerick"
=> (str (url "https://api.twitter.com/1/users/profile_image/cemerick" "../../lookup.json"))
"https://api.twitter.com/1/users/lookup.json"
The :query slot can be a string or a map of params:
=> (str (assoc *3 :query {:a 5 :b 6}))
"https://api.twitter.com/1/users/profile_image/cemerick?a=5&b=6"
Note that url does not perform any url-encoding of paths. Use cemerick.url/url-encode to url-encode any paths/path components prior to passing them to url. e.g.:
=> (def download-root "http://foo.com/dl") #'cemerick.test-url/download-root => (str (url download-root "/")) "http://foo.com/" => (str (url download-root (url-encode "/"))) "http://foo.com/dl/%2F" => (str (url download-root (url-encode "/logical/file/path"))) "http://foo.com/dl/%2Flogical%2Ffile%2Fpath"
Ping cemerick on freenode irc or twitter if you have questions or would like to contribute patches.
Copyright ©2012 Chas Emerick and other contributors
Distributed under the Eclipse Public License, the same as Clojure. Please see the epl-v10.html file at the top level of this repo.
RetroSearch is an open source project built by @garambo | Open a GitHub Issue
Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo
HTML:
3.2
| Encoding:
UTF-8
| Version:
0.7.4