$line =~ s/(/d/d)(/d/d)/$1 $2/g [download]
In reply to Re: substituting capture groups substrings by Anonymous Monk in thread substituting capture groups substrings by naturalsciences