my @lines = $ftp->dir('\\');
print join("\n", @lines), "\n";