Anonymous user
FTP: Difference between revisions
Added Erlang implementation for the FTP task
(Added Erlang implementation for the FTP task) |
|||
Line 109:
-rw-rw-r-- 1 109 space-station 1134654 May 9 2005 When Space Makes you Dizzy.mp3
</pre>
=={{header|Erlang}}==
Erlang implementation using ftp module.
<lang erlang>
%%% To execute in shell, Run the following commands:-
%%% >c("ftp_example").
%%% >ftp_example:run().
-module(ftp_example).
-export([run/0]).
run() ->
Host = "ftp.easynet.fr",
Opts = [{mode, passive}],
User = "anonymous",
Password = "",
Directory = "/debian/",
File = "README.html",
%%% Open connection with FTP Server
io:format("Opening connection with host ~p ~n", [Host]),
{ok, Pid} = ftp:open(Host, Opts),
%%% Login as Anonymous user
io:format("Logging in as user ~p ~n", [User]),
ftp:user(Pid, User, Password),
%%% Change Directory to "/debian/"
io:format("Changing Directory to ~p ~n", [Directory]),
ftp:cd(Pid, Directory),
%%% Listing contents of current Directory
io:format("Contents of Current Directory ~n"),
{ok, Listing} = ftp:ls(Pid),
io:format("~p ~n", [Listing]),
%%% Download file "README.html"
io:format("Downloading File ~p to current directory ~n", [File]),
ftp:recv(Pid, File),
%%% Close connection
io:format("Closing connection to FTP Server"),
ftp:close(Pid).
</lang>
=={{header|Go}}==
| |||