FTP: Difference between revisions

The library [http://seed7.sourceforge.net/libraries/ftp.htm ftp.s7i] contains functions to

[http://seed7.sourceforge.net/libraries/ftp.htm#openFtp(in_string) open] and handle an

<lang seed7>$ include "seed7_05.s7i";

include "ftp.s7i";

const proc: main is func

local

var string: line is "";

begin

ftp := openFtp("kernel.org");

chdir(ftp, "/pub/linux/kernel");

for line range listDir(ftp, ".") do

writeln(line);

end for;

writeln(getFile(ftp, "README"));

close(ftp);