file size, transfer duration and transfer speed in KBs. Is there any way of doing this?

You sure can. There is the underlying dataconn class (see the documentation), which will let you read block by block (of 4Kb for instance). You just need to keep running totals (and you will have to take care of writing the blocks yourself to the local file).

You need to save a copy of epoch time (my $begin = time) at the beginning of the transfer) and then you can divide the amount of bytes of transferred by the seconds elapsed ($delta = time - $begin) to get the throughput in seconds.

The size() method will allow you to obtain the size of the file on the remote server, which will enable you to estimate how far through the transfer you are. Be careful: if you are transferring text files between Unix and Windows systems, the sizes will differ due to newline conversions. Just clamp the progress rate to 100% if you wind up with more bytes on the receiving end than you started out with.

If you don't need to know the dynamic transfer rate (during the transfer, that is), the just take the timestamp at the beginning and end to obtain the duration, and divide the size of the file by time taken, to obtain the overall throughput.

• another intruder with the mooring in the heart of the Perl


In reply to Re: Obtaining statistics for Net::FTP transfers by grinder
in thread Obtaining statistics for Net::FTP transfers by qragamu

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.