Re: To Log FTP Transfers.

[karlgoethebier]

Here is the more verbose version (from the manual of Net::SFTP:

For GET use:

$sftp->get($remote [, $local [, \&callback ] ])

    sub callback {
        my($sftp, $data, $offset, $size) = @_;
        print "Read $offset / $size bytes\r";
    }

For PUT use:

$sftp->put($local, $remote [, \&callback ])

 sub callback {
        my($sftp, $data, $offset, $size) = @_;
        print "Wrote $offset / $size bytes\r";
    }

See also Callback (computer programming)

Regards, Karl