Kevin Old wrote: > On Tue, 29 Mar 2005 13:30:57 -0800, Wagner, David --- Senior > Programmer Analyst --- WGO <[EMAIL PROTECTED]> wrote: >> I have a directory which has output reports in them. The >> big problem is that they are just a bunch of letters and numbers >> like 2781424330fdac47c916.xls. So the user would like a more >> recognizable file name. >> >> This is to run on Solaris w/ Perl 5.8.3. I have tried the >> following two modules on my PC using ActiveState 5.8.3 >> under XP: Spreadsheet::ParseExcel ( 15 minutes plus to read 4 files >> size 4 to 12 meg) and Spreadsheet::ParseExcel::Simple ( 4 minutes >> for the same files as ParseExcel ) >> >> I am running my first test on Solaris using Simple and the >> first file took 5 minutes to process. Still have 3 to do. >> >> Any suggestions on what to do? The key for naming the file >> is ( believe it or not ) the last column of the first row on >> worksheet 1. >> >> Any questions and/or problems, please let me know. > > Hey Wags, > > I'm kind of confused on what you're asking help for. Are you asking > for help on getting the last column of the first row on worksheet 1 > for each file you have? > > If so, my suggestion is to use File::Find to parse down through your > directory and use a regex to identify the files you want, then use > Spreadsheet::ParseExcel to read the first worksheet and get the first > row. Sorry for not being clear. I can find the files I want, but to open them takes way too long. On my test node, to open the four files and get the first line of worksheet 1 took almost 38 minutes. Any other file processing would be over almost before it got started, but with the MS setup it does not work that way. Like I stated, I have tried both ParseExcel and parseExcel::Simple and each for some reason reads in the whole file at once.
Is there a way to tell either of these modules to just open and allow me to read what I need and then stop. Also it can take up to another 5 to 10 minutes after my program says it is done, for the prompt to return also. Thanks for the reply, but is there any way to easily read something from MS and NOT have the overhead of the whole file being stuffed into memory. Wags ;) > > Use the code on > http://search.cpan.org/~kwitknr/Spreadsheet-ParseExcel-0.2603/ParseExcel.pm > in the Synopsis section and play around with the for loops to have it > break after the first row. > > Here's a great column on using File::Find. > http://www.stonehenge.com/merlyn/LinuxMag/col45.html > > Sorry for the lack of syntax, but if you need some later, let me know! > > Hope this helps, > Kevin ******************************************************* This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. ******************************************************* -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>