Since you haven't provided any code, it would be difficult. Here are some thoughts:
* Make sure you're doing a "while(<INFILE>){" instead of "@array = <INFILE>" * Try precompiling your regular expressions. (see qr// in perlop under "Quote and Quote-like Operators") -----Original Message----- From: Gladstone Daniel - dglads [mailto:[EMAIL PROTECTED] Sent: Monday, February 27, 2006 8:50 AM To: beginners@perl.org Subject: Need to improve throughput - Any thoughts I have a text file with around 1 million lines and I need to do a search And replace on over 9000 words. I am currently reading a line and passing A hash table against it and any matches it is replacing the word in the string. It is running real slow. Any thoughts on how to improve it? Daniel Gladstone ([EMAIL PROTECTED]) -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>