On 03/09/2013 06:56, Jim Gibson wrote:

For readability, use the extended form and the more modern
zero-width  assertions \A and \z:

if ( $_[0] !~ m{ \A [ric] \. (?:[1-578]) | (?:6 (\.[12])? ) \z }ix ) {

Hi Jim

You have incorrect parentheses. Your regex matches

    \A [ric] \. (?:[1-578])

or

    (?:6 (\.[12])? ) \z

which isn't what is wanted at all!

Rob

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to