|
NAMENet::SSH2::File - SSH2 SFTP file objectDESCRIPTIONAn SFTP file object is created by the Net::SSH2::SFTP "open" method.read ( buffer, size )Read size bytes from the file into a given buffer. Returns number of bytes read, or undef on failure.write ( buffer )Write buffer to the remote file.The "libssh2_sftp_write" function wrapped by this method has a complex and quite difficult (if not impossible at all) to use API. It tries to hide the packet pipelining being done under the hood in order to attain decent throughput. Net::SSH2 can not hide that complexity without negatively affecting the transmission speed so it provides just a thin wrapper for that library function. An excerpt from "libssh2_sftp_write" manual page follows: WRITE AHEAD Starting in libssh2 version 1.2.8, the default behavior of libssh2 is to create several smaller outgoing packets for all data you pass to this function and it will return a positive number as soon as the first packet is acknowledged from the server. This has the effect that sometimes more data has been sent off but isn't acked yet when this function returns, and when this function is subsequently called again to write more data, libssh2 will immediately figure out that the data is already received remotely. In most normal situation this should not cause any problems, but it should be noted that if you've once called libssh2_sftp_write() with data and it returns short, you MUST still assume that the rest of the data might've been cached so you need to make sure you don't alter that data and think that the version you have in your next function invoke will be detected or used. The reason for this funny behavior is that SFTP can only send 32K data in each packet and it gets all packets acked individually. This means we cannot use a simple serial approach if we want to reach high performance even on high latency connections. And we want that. This is an example of simple file uploading use constant BUF_SIZE => 128*1024; my $sftp = $ssh2->sftp; open my $fh, '<', '/tmp/doc.txt'; my $sf = $sftp->open('doc.txt', O_CREAT|O_WRONLY|O_TRUNC); my $buf; while (sysread($fh, $buf, BUF_SIZE)) { while (length $buf) { my $rc = $sf->write($buf); if (!defined($rc)) { $sftp->die_with_error('write error'); } # Remove transferred data from the buffer. substr($buf, 0, $rc) = ''; } } statReturns file attributes; see Net::SSH2::SFTP::stat.setstat ( key, value... )Sets file attributes; see Net::SSH2::SFTP::setstat.seek ( offset )Set the file pointer offset.tellReturns the current file pointer offset.SEE ALSONet::SSH2::SFTP.Check Net::SFTP::Foreign for a high level, perlish and easy to use SFTP client module. It can work on top of Net::SSH2 via the Net::SFTP::Foreign::Backend::Net_SSH2 backend module. COPYRIGHT AND LICENSECopyright (C) 2005, 2006 by David B. Robins <dbrobins@cpan.org>;Copyright (C) 2015 by Salvador Fandiño <sfandino@yahoo.com>; All rights reserved. This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.0 or, at your option, any later version of Perl 5 you may have available. The documentation for this package contains and excerpt from libssh2 manual pages. You can consult the license of the libssh2 project for the conditions regulating the copyright of that part.
Visit the GSP FreeBSD Man Page Interface. |