My team handles automated file transfers within the company and to/from external companies. We have been asked to see how long it would take us to move a few hundred DVD's worth of data from its current location on jukeboxes to a SAN. We are trying two different methods, one using some third-party software we have to automate moving data and the other is Perl. The data itself is kept in an array of about 1000 directories, each directory contains a variable number of files that need to be moved. When we do this, we need to make sure we maintain the directory layout.
I had done some tests a while back benchmarking how fast it would take File::Copy to move large files versus our third-party software. Normally, File::Copy would come out on top which is part of the reason we are looking at trying this out with Perl.
My question is this: has anyone set up something like this before - thoughts on other ways to do this. What I have set up is one script that will take a parameter to indicate which sub-directory structure needs to be copied. It will then loop through the subdirectories, copying all the files sequentially to the new location, creating the new directories as it goes. I looked at File::Xcopy, but I'm not sure if it would help us much and since I've never used it before, I'm not sure if the copies would be optimized the way they seem to be with File::Copy.
Thoughts would be appreciated.
Thanks.
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.