Strona 1 z 2 12 OstatniOstatni
Pokaż wyniki 1 do 10 z 15

Temat: Perl ftp

  1. #1
    Avatar Hardiel
    Hardiel jest offline Damian
    Zarejestrowany
    May 2008
    Skąd
    Kielce
    Postów
    121

    Domyślnie Perl ftp

    Cześć!
    Mam pytanie czy istnieje możliwość stworzenia skryptu w perl który bedzie łaczył do serwera (przez ftp) oczywiscie nie mówie o wymianie plikow tylko proste podłaczenie a w skrypcie zeby mozna bylo zadeklarować adres,login,pass
    Bardzo proszę o pomoc z góry dzieki.
    Pozdrawiam

  2. #2
    Zarejestrowany
    Jun 2006
    Skąd
    rand(.eu)
    Postów
    8,748

    Domyślnie

    Kod:
    use Net::FTP;
    (dokumentacja http://search.cpan.org/dist/libnet/Net/FTP.pm)
    ctrl-alt-del.cc - soft reset site for IT admins and other staff :-)

  3. #3
    Avatar Hardiel
    Hardiel jest offline Damian
    Zarejestrowany
    May 2008
    Skąd
    Kielce
    Postów
    121

    Domyślnie

    Sorry że jeszcze zawracam Ci głowe dopiero zaczynam w tym dziale
    Kod:
      use Net::FTP;
    
        $ftp = Net::FTP->new("adresstrony", Debug => 0)
          or die "Cannot connect to some.host.name: [email protected]";
    
        $ftp->login("login,haslo,konto") #Nie rozumiem dlaczego mi tu wyrzuca bład: Login authentication failed (A jest na 100% dobry)
          or die "Zły login!", $ftp->message;
    
        $ftp->get("that.file")
          or die "get failed ", $ftp->message;
    
        $ftp->quit;
    Sorry edytuje juz sobie poradzilem :P Dzieki!
    Ostatnio edytowane przez Hardiel : 05-20-2008 - 15:40

  4. #4
    Avatar Hardiel
    Hardiel jest offline Damian
    Zarejestrowany
    May 2008
    Skąd
    Kielce
    Postów
    121

    Domyślnie

    Hmm mam jeszcze tylko 1 pytanko czy tym modułem da sie wgrywac pliki z mojego komputera na serwer? Jesli tak to jaka komenda bo widze ze chyba ten modul odnosi sie tylko do operacij na serwerze.

    Pozdrawiam!
    Ostatnio edytowane przez Hardiel : 05-20-2008 - 16:37 Powód: Bład w zdaniu

  5. #5
    Zarejestrowany
    Jun 2006
    Skąd
    rand(.eu)
    Postów
    8,748

    Domyślnie

    hmmmm...
    Kod:
    $ftp->put("plik");
    ale zgaduje, nie sprawdzalem...
    ctrl-alt-del.cc - soft reset site for IT admins and other staff :-)

  6. #6
    Avatar Hardiel
    Hardiel jest offline Damian
    Zarejestrowany
    May 2008
    Skąd
    Kielce
    Postów
    121

    Domyślnie

    Hmm Cos jest nie tak oto cały kod:
    Kod:
    use Net::FTP;
    $x = "ciachciach";
    $user = "lala";
    $pass = "bumbum";
    $directory = "/log";
    print "Connecting to $x\n";
        $ftp = Net::FTP->new("$x", Debug => 0)
          or die "Nie moge polaczyc do: $x: [email protected]";
    print "Connect to $x\n";
    print "Logging $x\n";
        $ftp->login($user,$pass) 
          or die "Zly login lub haslo!", $ftp->message; 
    print "Logged to  $user\n";
    print "Searching $directory\n";
        $ftp->cwd("$directory") 
          or die "Nie moge znalezc podanego katalogu!", $ftp->message; #Zly? :>    
    print "joining to directory: $directory\n";
        $ftp->put("C:\Documents and Settings\user\Pulpit\a.txt")
         or die "get failed ", $ftp->message;
        
        $ftp->quit;
    Błąd:
    -Cannot open "lokalizacja": Invalid argument at "lokalizacja" Get failed ok Current directory is /log

    Zarowno katalog na serwerze jak plik na moim komputerze istnieja a lokalizacje sa poprawne.

  7. #7
    Zarejestrowany
    Jun 2006
    Skąd
    rand(.eu)
    Postów
    8,748

    Domyślnie

    Hmmmm... sprawdzilbym uruchamiajac ale nigdzie nie mam zadnego serwera FTP na ktory moglbym sie zalogowac... poszukam czegos i dam znac pozniej.
    ctrl-alt-del.cc - soft reset site for IT admins and other staff :-)

  8. #8
    Avatar Hardiel
    Hardiel jest offline Damian
    Zarejestrowany
    May 2008
    Skąd
    Kielce
    Postów
    121

    Domyślnie

    Oki Poczekam

  9. #9
    Zarejestrowany
    Apr 2008
    Postów
    38

    Domyślnie

    mi ten kod dziala super
    tylko katalog zamiast "/log" musialem dac "log", ale to chyba zalezy od konfiguracji serwera, bo jesli uzytkownik jest "chrootowany" w swoim domowym katalogu to IMO "/log" powinno przejsc bezblednie, aczkolwiek nie testowalem. A jak user ma dostep do calego serwera to "/log" pewnie sie odwoluje do katalogu "log" w katalogu glownym a nie domowym, a standardowo ani w windowsie ani w linuksie nie ma takiego katalogu

  10. #10
    Avatar Hardiel
    Hardiel jest offline Damian
    Zarejestrowany
    May 2008
    Skąd
    Kielce
    Postów
    121

    Domyślnie

    Hmm mi dziala wszystko ok procz tego ze jednak pliku na serwer nie wrzuca

Strona 1 z 2 12 OstatniOstatni

Podobne wątki

  1. [Perl] Kurs Perl - cz.1 - wprowadzenie i podstawy
    By TQM in forum Perl/Python/TCL/Prolog
    Odpowiedzi: 22
    Autor: 10-27-2014, 00:50
  2. Odpowiedzi: 18
    Autor: 07-14-2009, 11:55
  3. Odpowiedzi: 31
    Autor: 05-20-2008, 17:01
  4. bot irc PERL
    By jaszu in forum Perl/Python/TCL/Prolog
    Odpowiedzi: 1
    Autor: 08-01-2007, 08:40
  5. Problem z Petla Perl
    By szpuni in forum Perl/Python/TCL/Prolog
    Odpowiedzi: 11
    Autor: 07-03-2006, 15:23

Zasady Postowania

  • Nie możesz zakładać nowych tematów
  • Nie możesz pisać wiadomości
  • Nie możesz dodawać załączników
  • Nie możesz edytować swoich postów
  •  
Subskrybuj