Help for this page
$string = substitute($string, '([^,]*,)([^,]*,)([^,]*,)([^,]*,)', $s +tr_regexp);