s/\b(?=(\d\d?\b))/0 x(3-length$1)/eg; # or s/\b(?=(\d{1,3}))/0 x(3-length$1)/eg;