Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    ...
            #$my_ftp->get("*.txt");
            return;
    }
    
  2. or download this
    Net::FTP::Recursive=GLOB(0xa4bee8)<<< 250 CWD command successful.
    Net::FTP::Recursive=GLOB(0xa4bee8)>>> PWD
    ...
    Net::FTP::Recursive=GLOB(0xa4bee8)<<< 257 "/Browse_For_Drivers/Servers
    +, Storage & Networking/PowerEdge" is current directory.
    Net::FTP::Recursive=GLOB(0xa4bee8)>>> QUIT
    Net::FTP::Recursive=GLOB(0xa4bee8)<<< 221 Thank you for using the Dell
    + FTP site, please come again.
    
  3. or download this
    Net::FTP::Recursive=GLOB(0x1054fa8)<<< 250 CWD command successful.
    Net::FTP::Recursive=GLOB(0x1054fa8)>>> PASV
    Net::FTP::Recursive=GLOB(0x1054fa8)<<< 227 Entering Passive Mode (143,
    +166,135,12,255,118)
    Net::FTP::Recursive=GLOB(0x1054fa8)>>> RETR *.txt
    Can't use an undefined value as a symbol reference at /usr/share/perl5
    +/Net/FTP/dataconn.pm line 54.