fogus (owner)

Fork Of

gist: 106079 by kyleburton clojure ftp example

Revisions

gist: 106170 Download_button fork
public
Public Clone URL: git://gist.github.com/106170.git
Embed All Files: show embed
Clojure #
raw 
1
2
3
4
5
6
7
8
9
10
11
12
13

(ns tiger
  (:import ( org.apache.commons.net.ftp FTP FTPClient))
  (:require [com.github.kyleburton.sandbox.ftp :as ftp])
  (:use [ clojure.contrib.str-utils :as str]))
 
(def *tiger-ftp-url* "ftp://anonymous:user%40host.com@ftp2.census.gov/geo/tiger/TIGER2008/")
 
(ftp/list-all *tiger-ftp-url*)
(ftp/list-files *tiger-ftp-url*)
(ftp/list-directories *tiger-ftp-url*)
 
(ftp/retrieve-file *tiger-ftp-url* "tl_2008_us_nectadiv.zip" "/tmp/tl_2008_us_nectadiv.zip")