Select Code to Download

my $list = $ftp->dir();
unless ($list) { ...dir timed out or other error... }
for (@$list) {
    # process each directory entry
}