Try this.
$id =~ s/([a-z]) ([a-z])/$1,$2/; [download]
In reply to Re: Looking for appropriate Regex by hdb in thread Looking for appropriate Regex by better