We have written an utility to automate file transfer through FTP service using Perl. We want to know how we can track the progress of upload?
可以将文章内容翻译成中文,广告屏蔽插件可能会导致该功能失效(如失效,请关闭广告屏蔽插件后再试):
问题:
回答1:
Net::FTP has a hash
method which will print a #
mark for every chunk (of a user-definable size) transferred to a user-specified file handle.
You can also enable this progress indicator in the constructor:
Hash
- If given a reference to a file handle (e.g.,\*STDERR
), print hash marks (#
) on that filehandle every 1024 bytes. This simply invokes thehash()
method for you, so that hash marks are displayed for all transfers. You can, of course, callhash()
explicitly whenever you'd like.
I have not used it, but sounds promising.