RE: memory usage issue

2003-02-11 Thread James Hooker
Anyone OK, I see your response that you removed this line. Forget my previous question. In comment to your processing time I have pre-allocated hash keys to see if this would speed up my processing. e.g. %hash = (100_000). as opposed to %hash = (); The performance was negligible. Does anyone ha

Xbase module 1.07

2003-02-11 Thread Ian Robertson
  Good afternoon all,   I am using the Xbase module to read foxpro 6 tables. Everything is working fine, apart from the seek function. When I call:   $stat=$database->seek($keyvalue);   I get the error message:   Can't locate object method "seek" via package "Xbase" (perhaps you fo

RE: memory usage issue

2003-02-11 Thread James Hooker
Deepak I am very interested in your problem since I process large files (~20-300mb). Can you please explain some more about your problem. What does the statement "@$msgref = (@$msgref, $mid);" have to do with increasing processing time? James C. Hooker -Original Message- From: Khosla,

RE: please help me with following error

2003-02-11 Thread Stovall, Adrian M.
From: Nagesh Pai [mailto:[EMAIL PROTECTED]] Sent: Monday, February 10, 2003 7:42 PM To: [EMAIL PROTECTED] Subject: please help me with following error I have installed active state perl on windows 2000 professional operating system. I copied all the modules required for running a perl script t

RE: memory usage issue

2003-02-11 Thread Khosla, Deepak
Thanks!! Sounds like I need to go through all my code and some simple changes may let the users start liking me and perl again :-) -Original Message- From: Tillman, James [mailto:[EMAIL PROTECTED]] Sent: Tuesday, February 11, 2003 8:12 AM To: Khosla, Deepak; [EMAIL PROTECTED]; [EMAIL PROT

RE: memory usage issue

2003-02-11 Thread Tillman, James
You might try the standard "array appending" Perl idiom, which is: push(@$msgref, $mid); This will perform the array appending operation without accessing every element of the entire array, which your method was doing. It's the difference between the act of sliding a card into the bottom of a ca

RE: memory usage issue

2003-02-11 Thread Khosla, Deepak
To clarify: REMOVING that line made all the difference! I have t figure out how to do this a different way.. -Original Message- From: Khosla, Deepak Sent: Tuesday, February 11, 2003 7:57 AM To: [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED] Cc: [EMAIL PROTECTED] Subject: RE: mem

RE: memory usage issue

2003-02-11 Thread Khosla, Deepak
Found it!! One little line in the loop: @$msgref = (@$msgref, $mid); made all the difference. Now I can process 4500 lines per sec throughout. So the question, is there a way to speed up the above operation? $mid is a 8 byte string. At array size 1000, the speed is down to 1000 lin

posting for perl-win32-users

2003-02-11 Thread lvu00sjg
I am attempting to set the bits on my parallel port using the cpan module Device::ParallelPort. I am using windows 98 and perl 5.8.0 build 804 and have sucessfully installed Device::ParallelPort using ppm. The code I am using is #!/usr/bin/perl -w # # test parallel port module # use LWP::Sim

Re: Quirky behavior with for loop

2003-02-11 Thread Simon Oliver
> My abridged code is below. What am I doing wrong, please? I can't see it. Without any data it's hard to tell, but there are a few things that could be a problems. First off, you haven't used strctures or -w. Declare your variabes with my() contructs. foreach $i (1..scalar(@question)) { p