On Sun, Jul 14, 2002 at 04:45:19AM -0700, John W. Krahn wrote:
 So your split could be simplified to:
> 
> my @tokens = split /({\\[^\s}{]+|\\[^\s\\}]+|\\[\\}]|})/, $line;
> 
> 

Ah, that cuts the tokenize process in half. My entire script now
takes 40 seconds to run instead of 50. 

Thanks!

Paul

-- 

************************
*Paul Tremblay         *
*[EMAIL PROTECTED]*
************************

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to