No such thing as a small change | |
PerlMonks |
Re: Improvement on script needed.by bm (Hermit) |
on Sep 08, 2003 at 12:48 UTC ( [id://289756]=note: print w/replies, xml ) | Need Help?? |
Your script would be much quicker if you took the open and close statements out of the foreach (keys %key) loop.
Do those statements only once, and maintain your data in arrays. Disk operations should be minimal, and in your case you only need to read and write once.
In Section
Seekers of Perl Wisdom
|
|