ChipmunkCHeeks has asked for the wisdom of the Perl Monks concerning the following question:
use Net::SFTP; sub progress{ my ($sftp, $data, $offset, $total) = @_; my $num_width = length $total; select STDOUT; $|=1; print "<layer>Wrote $offset bytes of $total</layer>"; } sftp->put($File, $RemoteFile, \&progress);
Edit: g0n - replaced pre tags with code tags
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: CGI sftp callback progress meter(?)
by ikegami (Patriarch) on Dec 15, 2005 at 00:02 UTC | |
by ChipmunkCHeeks (Initiate) on Dec 19, 2005 at 19:29 UTC |