According to its manpage, you can enable 'hash' in Net::FTP and then just count them as they arrive, to give the amount of data transfered, or get the file size prior to transfer and divide them to get a percentage.

the hatter