note LanX ++[AnomalousMonk] for demonstrating what \K [id://1004848|is good for]! =)<P> Maybe I'm boring ... but I prefer more explicit code with split-and-join over regex-acrobatics:<P> <c> my $nth = 4; my $str = 'a,bb,ccc,dddd,eeeee,ffffff'; my @str= split /,/,$str; $str = join ( "," , @str[0..$nth-1] ) . "|" . join ( "," , @str[$nth..$#str] ); print qq{'$str'}; </c><P> <!-- Node text goes above. Div tags should contain sig only --> <div class="pmsig"><div class="pmsig-708738"> <p>Cheers Rolf </div></div> 1004836 1004836