Ronald said: >This message was deferred because it's over the size limit. There were 2800 lines of re debug output (blame Uri ;-)
On Tue, Dec 13, 2005 at 10:26:31PM -0500, Jerrad Pierce wrote: > Daily module reviews/recommendations until X-mas. > > http://web.mit.edu/belg4mit/www/ > > Re: Multiple keeps? > I didn't bother testing keep with () because it just doesn't make any sense > > use Regexp::Keep; > > @F = ( > 'aabbddddff', > 'abcfff', > 'aabbccffff', > ); > > my $re = qr/a+\Kb*c*\K[^f]*ff/; > print "RE: $re\n"; > > foreach( @F ){ > print "IN: $_\n"; > s/$re/s/g; #Think about it ;-) > print "OUT: $_\n"; > } > > > Output: > > RE: (?-xism:a+.{0}(?{ Regexp::Keep::KEEP })b*c*.{0}(?{ Regexp::Keep::KEEP > })[^f]*ff) > IN: aabbddddff > OUT: aabbs > IN: abcfff > OUT: abcsf > IN: aabbccffff > OUT: aabbccsff -- H4sICNoBwDoAA3NpZwA9jbsNwDAIRHumuC4NklvXTOD0KSJEnwU8fHz4Q8M9i3sGzkS7BBrm OkCTwsycb4S3DloZuMIYeXpLFqw5LaMhXC2ymhreVXNWMw9YGuAYdfmAbwomoPSyFJuFn2x8 Opr8bBBidccAAAA= -- MOTD on Pungenday, the 56th of The Aftermath, in the YOLD 3171: nuppin' _______________________________________________ Boston-pm mailing list Boston-pm@mail.pm.org http://mail.pm.org/mailman/listinfo/boston-pm
