Have you tried trapping for errors similar to the code in grantm's post above?:

my $path = $ftp->pwd() or
  die "pwd failed: " . $ftp->code() . ": " . $ftp->message();
print "$path\n";
[download]