Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re: help required for regexp

by si_lence (Deacon)
on Dec 07, 2011 at 09:25 UTC ( [id://942189] : note . print w/replies, xml ) Need Help??


in reply to help required for regexp

If your example is not a simplified case to illustrate your problem you could also use
$str =~ s/(\d)\d+/$1/g;