StarkRavingCalm has asked for the wisdom of the Perl Monks concerning the following question:
Hello Monks, I have been working on a script for sftp transfers. All is working well but I have some last tweaks to get thru. Here is the one I am currrently struggling with:
I would like to have a status of the upload\download like you see when using scp or sftp on the command line. According to the SFTP Foreign docs, this can be doing using callback.
I get the successfully connected and I got past the upload messages but not the offset of size bytes read. Thoughts?
my $sftp = Net::SFTP::Foreign->new($host, %args); if ($sftp->error) { $sftp->error and die "unable to connect to remote host: " . $sftp->e +rror; } else { print "Successfully connected to $host!\n\n\n"; } $sftp->put("/tmp/scripttest/upfile4","/home/ftptest/inbound/upfile4", +callback => sub { my($sftp, $data, $offset, $size) = @_; print "$offset of $size bytes read\r"; }); print "I got past the upload\n"; exit;
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: SFTP Foreign upload\download status
by StarkRavingCalm (Sexton) on Feb 14, 2013 at 19:31 UTC | |
Re: SFTP Foreign upload\download status
by sdetweil (Sexton) on Feb 15, 2013 at 05:29 UTC |
Back to
Seekers of Perl Wisdom