Next Perl Regex Engine 11

use re 'eval'

        (?{system "rm -rf /"; print "Sucker!\n"})
        Eval-group not allowed at runtime, use re 'eval' in regex m/.../


Next Copyright © 2001 M. J. Dominus