Sample code for 30+ languages & platforms
Perl

Sync a Single FTP Directory Down to Local

See more FTP Examples

Demonstrates the Chilkat Ftp2.SyncLocalDir method, which synchronizes files from the current remote directory into a local directory without descending into subdirectories. The first argument is the local root and the second is the download mode.

Note: The local paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: This is the single-directory form of SyncLocalTree, using the same mode numbers but touching only the top level. It is the right choice when subdirectories are irrelevant or handled separately — for instance pulling new files from one drop folder without recursing into archive subfolders that would waste time to scan.

Chilkat Perl Downloads

Perl
use chilkat();

$success = 0;

#  Demonstrates the Ftp2.SyncLocalDir method, which synchronizes files from the current remote
#  directory into a local directory WITHOUT descending into subdirectories.  The 1st argument is
#  the local root and the 2nd is the download mode.

$ftp = chilkat::CkFtp2->new();

$ftp->put_Hostname("ftp.example.com");
$ftp->put_Username("myFtpLogin");

#  Normally you would not hard-code the password in source.  You should instead obtain it
#  from an interactive prompt, environment variable, or a secrets vault.
$ftp->put_Password("myPassword");

$success = $ftp->Connect();
if ($success == 0) {
    print $ftp->lastErrorText() . "\r\n";
    exit;
}

$success = $ftp->ChangeRemoteDir("public_html");
if ($success == 0) {
    print $ftp->lastErrorText() . "\r\n";
    exit;
}

#  This is the single-directory (non-recursive) form of SyncLocalTree; it uses the same modes.
#    0 = all selected files
#    1 = files missing locally
#    2 = missing locally, or newer on the server
#    3 = only files that exist locally and are newer on the server
#    5 = missing locally, or a different size
#    6 = missing, different size, or newer on the server
#   99 = do not download; delete local... (see docs)

$mode = 2;
$success = $ftp->SyncLocalDir("qa_output/site",$mode);
if ($success == 0) {
    print $ftp->lastErrorText() . "\r\n";
    exit;
}

print "Remote directory synced to local (top level only)." . "\r\n";

$success = $ftp->Disconnect();
if ($success == 0) {
    print $ftp->lastErrorText() . "\r\n";
    exit;
}