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]