net::ftp come faccio a testare i rc

[sabrewolf74]

Ciao a tutti, faccio un semplice FTP con uno script PERL usando il modulo net::ftp, come faccio ad avere in output tutti i return code? Ora testo solo se i metodi (get, open etc.) vanno bene, ma vorrei testare se ho ricevuto il codice di 'file transfer completed successfully', nel mio caso il codice 250.
Grazie!
p.s. ho già cercato, ma inutilmente, ecco perchè scrivo qui

[shishii]

potrebbe bastare settare:

use Net::FTP;
$ftp = Net::FTP->new("servername", Debug => 1);

nota il "Debug => 1".