If you use Net::FTP as shown above, you can

warn $ftp->message();
[download]

to see the responses to your commands with their 100-500 numbers and all.

  p