[Perl] Lista plikow

0

Napisalem sobie prosty klient FTP w perlu. Mam problem z wylistowaniem plikow w katalogu. Mam takie cos...

$xxx->ls("folder");

Ale po polaczeniu nie listuje mi plikow</ort>

0

Zrobiłeś prosty błąd, żeby wylistować zawartość folderu musisz wrzucić dane do tablicy a potem pobrać z tablicy za pomocą pentli i wyświetlić każdy element tablicy.

przykład :

#!/usr/bin/perl
$login="user_name";
$haslo="password_name";

use Net::FTP;
$f = Net::FTP->new ('ip lub hostname')
or die "brak polaczenia: $@\n";
$f->login ($login, $haslo)
or die "nieudane zalogowanie\n";
@lines = $f->dir("/home/coś");
foreach $l (@lines) {
  print $l,"\n";
}
$f->quit;

Jak zobaczysz to załatwia Ci sprawe wyświetlania zawartości katalogu.
Zamiast polecenia ls [@lines = $f->ls("/home/coś");]
proponuje dir [(@lines = $f->dir("/home/coś");]
wynik będzie bardziej czytelny.

Pozdrawiam i życzę powodzenia w dalszej przygodzie z perlem

1 użytkowników online, w tym zalogowanych: 0, gości: 1