This part of your code works here:
[2005]tom@margo ~ $ perl
use Net::SFTP;
use Net::SFTP::Attributes;
my $sftp = Net::SFTP->new('test2.dievision', user => 'MYNAME', passwor
+d => 'MYPASSWORD', debug => 1);
$sftp->ls('/(some/dir', sub {print STDERR "$_[0]->{filename}\n"});
1;
I get a whole lot of debug information, and the file-listing as expected. Changing the anonymous sub to:
$sftp->ls('/some/dir', sub {my $attrs = $sftp->do_stat($_[0]->{filenam
+e});
print STDERR $_[0]->{filename}, " ", $attrs->gid, " ", $attrs-
+>size, "\n"});
resulted in correct answers as to gid and size; are you sure the connection is working correctly?
regards,
tomte
An intellectual is someone whose mind watches itself.
-- Albert Camus