Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Hi.. I need to optimise the following reg exp so that it executes faster. Can anyone help? Thanks
^([\d\w]{15}[\x01]\d{12}[\x01]\d{2}(.){6}((13((0[0-9]|([1-4][0-9])|5[0 +-9]))|14((0[0-9]|([1-2][0-9])|30)))[0-5][0-9])801(?:.*))$

Replies are listed 'Best First'.
Re^3: Regex Optimization Question
by Anonymous Monk on May 16, 2011 at 10:06 UTC