Next Perl Regex Engine 13

use re 'eval'

         if (PL_op->op_flags & OPf_SPECIAL)
                PL_reginterp_cnt = I32_MAX; /* Mark as safe.  */


Next Copyright © 2001 M. J. Dominus