comment on

Thanks. If I replace the rget call with this:

                 $ftp->rget(
                        FlattenTree => 1,
                        MatchDirs => qr/PowerEdge (R810|R610|R720|R620
+|M620|M1000E)/,
                        MatchFiles => qr/\.txt$/,
                );
[download]

I get it downloading directories, but it doesn't seem to find any text files, as it doesn't look like it's recursing deep enough. Is there a setting for how deep to go? I get this (snippet shown):

Net::FTP::Recursive=GLOB(0x2355f08)>>> LIST
Net::FTP::Recursive=GLOB(0x2355f08)<<< 150 Opening BINARY mode data co
+nnection.
Net::FTP::Recursive=GLOB(0x2355f08)<<< 226 Transfer complete.
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Chassis Sys
+tem Management
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Diagnostics
-rwxrwxrwx   1 owner    group          144462 Aug 29  2012 index.html
drwxrwxrwx   1 owner    group               0 Sep 25  2012 Legacy
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Network
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Rack Soluti
+ons
drwxrwxrwx   1 owner    group               0 Aug 29  2012 SAS Drive
drwxrwxrwx   1 owner    group               0 Aug 29  2012 SCSI non-RA
+ID
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Serial ATA
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Systems Man
+agement
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Tape Automa
+tion
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Tape Drives
Net::FTP::Recursive=GLOB(0x2355f08)>>> PWD
Net::FTP::Recursive=GLOB(0x2355f08)<<< 257 "/Browse_For_Drivers/Server
+s, Storage & Networking/PowerEdge/PowerEdge M1000E" is current direct
+ory.
Returned from rget in /Browse_For_Drivers/Servers, Storage & Networkin
+g/PowerEdge.
Net::FTP::Recursive=GLOB(0x2355f08)>>> CDUP
Net::FTP::Recursive=GLOB(0x2355f08)<<< 250 CDUP command successful.
Net::FTP::Recursive=GLOB(0x2355f08)>>> CWD PowerEdge M620
Net::FTP::Recursive=GLOB(0x2355f08)<<< 250 CWD command successful.
Calling rget in /Browse_For_Drivers/Servers, Storage & Networking/Powe
+rEdge
Net::FTP::Recursive=GLOB(0x2355f08)>>> PASV
Net::FTP::Recursive=GLOB(0x2355f08)<<< 227 Entering Passive Mode (143,
+166,135,12,247,80)
Net::FTP::Recursive=GLOB(0x2355f08)>>> LIST
Net::FTP::Recursive=GLOB(0x2355f08)<<< 150 Opening BINARY mode data co
+nnection.
Net::FTP::Recursive=GLOB(0x2355f08)<<< 226 Transfer complete.
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Application
drwxrwxrwx   1 owner    group               0 Aug 29  2012 BIOS
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Chipset
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Diagnostics
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Drivers for
+ OS Deployment
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Enterprise 
+Solutions
drwxrwxrwx   1 owner    group               0 Aug 29  2012 ESM
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Fibre Chann
+el
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Firmware
-rwxrwxrwx   1 owner    group          147115 Aug 29  2012 index.html
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Lifecycle C
+ontroller
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Network
drwxrwxrwx   1 owner    group               0 Sep 25  2012 PCIe SSS
drwxrwxrwx   1 owner    group               0 Aug 29  2012 SAS Drive
drwxrwxrwx   1 owner    group               0 Aug 29  2012 SAS RAID
drwxrwxrwx   1 owner    group               0 Aug 29  2012 SCSI non-RA
+ID
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Serial ATA
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Systems Man
+agement
drwxrwxrwx   1 owner    group               0 Aug 29  2012 Video
Net::FTP::Recursive=GLOB(0x2355f08)>>> PWD
Net::FTP::Recursive=GLOB(0x2355f08)<<< 257 "/Browse_For_Drivers/Server
+s, Storage & Networking/PowerEdge/PowerEdge M620" is current director
+y.
Returned from rget in /Browse_For_Drivers/Servers, Storage & Networkin
+g/PowerEdge.
Net::FTP::Recursive=GLOB(0x2355f08)>>> CDUP
Net::FTP::Recursive=GLOB(0x2355f08)<<< 250 CDUP command successful.
Net::FTP::Recursive=GLOB(0x2355f08)>>> CWD PowerEdge R610
[download]

-- Burvil

In reply to Re^2: Net::FTP::Recursive code not downloading files by bowei_99
in thread Net::FTP::Recursive code not downloading files by bowei_99

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


Do you know where your variables are?
	PerlMonks