Я новичек в перле. Совсем не понимаю как работать с Net::SFTP::Foreign. Нужно пару примеров. Мне нужно зайти на комп, перейти в директорию, скажем /home/leog/data, посмотреть какие там файлы есть и стянуть пару файлов (после того, как в скрипте я выясню какие.) Как зайти - понятно: $sftp = Net::SFTP::Foreign -> new($IP,user=>leog); Перейти в директорию это $fh->do_opendir('/home/leog/data')? У меня сработало только так. Как переменная путь не брался. С ls вообще какая то заморочка. Срочно нужна помощь!!!

• perl Net::SFTP::Foreign - дайте пару примеров,madskull, 13:14 , 21-Июн-05

>Я новичек в перле. Совсем не понимаю как работать с Net::SFTP::Foreign. Нужно пару примеров. Мне нужно зайти на комп, перейти в директорию, скажем /home/leog/data, посмотреть какие там файлы есть и стянуть пару файлов (после того, как в скрипте я выясню какие.) Как зайти - понятно: $sftp = Net::SFTP::Foreign -> new($IP,user=>leog); Перейти в директорию это $fh->do_opendir('/home/leog/data')? У меня сработало только так. Как переменная путь не брался. С ls вообще какая то заморочка. Срочно нужна помощь!!!

use Net::SFTP::Foreign;
use Data::Dumper;

my $sftp = Net::SFTP::Foreign->new('mail',user=>'user');
my %h = $sftp->ls('/home');
print Dumper(\%h);

А do_opendir, как  и все do_* - это из другой оперы. (не разбирался, так как не нужно было)