http://www.perlmonks.org?node_id=655303


in reply to Re^2: can any reply out with a better code than this??
in thread can any reply out with a better code than this??

Sorry, asdfghjkl, I confused you by changing the string. Try running it with ri\d+ri\d+ri\d+ for a match. That was meant to emphasize the use of \Q...\E.