What do you get adding this line to your script after the $ftp->cwd($path) ?

Try changing the destination path to /tmp

$ftp->get($file,"/tmp/$file") 
    or die sprintf "Could not get $file from $path ", $ftp->message;
[download]