Help for this page

Select Code to Download


  1. or download this
    Net::FTP=GLOB(0x8293290)<<< 220 central.node.at FTP server (Version 6.
    +5/OpenBSD, linux port 0.3.2) ready.
    Net::FTP=GLOB(0x8293290)>>> user kurt
    ...
    Net::FTP=GLOB(0x8293290)<<< 150 Opening BINARY mode data connection fo
    +r 'file list'.
    Net::FTP=GLOB(0x8293290)<<< 226 Transfer complete.
    LS:  [test file]
    
  2. or download this
    $ftp = Net::FTP->new($destination, Debug=>2) || die "Couldn't connect:
    + $!\n";
    $ftp->login($username,$password) || die "Couldn't log in: $!\n";
    $ftp->cwd($path) || die "couldn't cwd! $!\n";
    print STDERR "DIR: [",$ftp->dir($filename),"]\n";
    print STDERR "LS:  [",$ftp->ls($filename),"]\n";