Clipper/FiveWin - ¿Como convertir array a cadena?

$array = array("Uno" , "Dos" , "Tres");

$cadena = Implode($array,"|");  //resultado: Uno|Dos|Tres

$array2 = Explode($cadena,"o"); //resultado $array2=("Un" , "|D" , "s|Tres")

Function implode(array,separator)

	string=""

	For i=1 To Len(array)

		If i==Len(array)

			separator=""

		EndIf

		string = string+array[i]+separator

	Next

Return string