How trivial is it to add a ?<{ } block that is executed with the
same semantics as ?{ }, except that instead of running when the
engine matches over it, it gets run as the engine backtracks over
it?

my $thing = qr/
        ?{ do_something() }
        ?<{ undo_it() }
        $try_this_pattern
/x;

if $try_this_pattern fails, undo_it() is called to undo
do_something().

-- 
 ()  Yuval Kogman <[EMAIL PROTECTED]> 0xEBD27418  perl hacker &
 /\  kung foo master: /me sneaks up from another MIME part: neeyah!!!!!

Attachment: pgpk19QbPRmXW.pgp
Description: PGP signature

Reply via email to