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!!!!!
pgpk19QbPRmXW.pgp
Description: PGP signature