Select Code to Download

open LOG, ">> $LOGFile" or die "IO error opening $LOGFile for append: 
+$!";
...
$ftp->get($filename);
print LOG "[get $filename] server response: ", $ftp->response || 'no r
+esponse', "\n";