FTP: Difference between revisions
Content added Content deleted
(Add draft to task.) |
(added racket) |
||
Line 14:
ftp.quit()
</lang>
=={{header|Racket}}==
<lang racket>
#lang racket
(require net/ftp)
(let* ([server "kernel.org"]
[remote-dir "/pub/linux/kernel/"]
[local-dir "files"]
[conn (ftp-establish-connection
server
21
"anonymous"
"")])
(ftp-cd conn remote-dir)
(map
(lambda (elem) (printf "~a\n" (string-join elem "\t")))
(ftp-directory-list conn "."))
(ftp-download-file conn "." "README")
(ftp-close-connection conn))</lang>
=={{header|REBOL}}==
| |||