A-M baby
This commit is contained in:
parent
764da6cbbb
commit
db842d013d
19005 changed files with 197040 additions and 7 deletions
6
Task/HTTP/Clojure/http-1.clj
Normal file
6
Task/HTTP/Clojure/http-1.clj
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
(defn get-http [url]
|
||||
(let [sc (java.util.Scanner.
|
||||
(.openStream (java.net.URL. url)))]
|
||||
(while (.hasNext sc)
|
||||
(println (.nextLine sc)))))
|
||||
(get-http "http://www.rosettacode.org")
|
||||
Loading…
Add table
Add a link
Reference in a new issue