split function for pl/pgsql

hi,

i'm looking for a split function, like perl or php.
I need doing a pl/pgsql function with a split return an array.
I must do some loop with this array for mass inserting.

I think of doing it with pl / perl but I need to do insert and I don't
find example with pl / perl and sql.

Here my function (not tested of course) :


CREATE FUNCTION candidat_valid (varchar ,varchar ,varchar, varchar,
varchar, varchar, varchar, varchar, varchar, varchar, text, oid,
varchar, varchar, varchar) RETURNS boolean AS '    DECLAREfunc_nom        ALIAS FOR $1;func_prenom        ALIAS FOR
$2;func_adresse1       ALIAS FOR $3;func_adresse2        ALIAS FOR $4;func_ville        ALIAS FOR $5;func_cp
ALIASFOR $6;func_pays        ALIAS FOR $7;func_email        ALIAS FOR $8;func_telephone        ALIAS FOR $9;func_gsm
   ALIAS FOR $10;func_commentaire    ALIAS FOR $11;func_cv            ALIAS FOR $12;func_nom_fichier    ALIAS FOR
$13;func_iddiplome     ALIAS FOR $14;func_idqualification    ALIAS FOR $15;
 
new_id    int4;indice int;tableau_diplome        int[];tableau_qualification    int[];    BEGIN
new_id := output of "SELECT nextval('candidat_id_seq')";
IF (func_nom_fichier == NULL) THEN    INSERT INTO candidat (id, nom, prenom, adresse1, adresse2, ville, cp,
pays, email, telephone, gsm, commentaire) VALUES (new_id, func_nom,
func_prenom, func_adresse1, func_adresse2, func_ville, func_cp,
func_pays, func_email, func_telephone, func_gsm, func_commentaire);ELSEINSERT INTO candidat (id, nom, prenom, adresse1,
adresse2,ville, cp,
 
pays, email, telephone, gsm, commentaire, cv, nom_fichier) VALUES
(new_id, func_nom, func_prenom, func_adresse1, func_adresse2,
func_ville, func_cp, func_pays, func_email, func_telephone, func_gsm,
func_commentaire, func_cv, func_nom_fichier);END IF;
indice := 0;
       tableau_diplome := split(',',func_iddiplome);       tableau_qualification := split(',',func_idqualification);
       while (tableau_diplome[indice]) {
        INSERT INTO candidat_diplome (id_candidat, id_diplome) VALUES
(new_id,tableau_diplome[indice]);           indice := indice + 1;       }
       indice := 0;       while (tableau_qualification[indice]) {
        INSERT INTO candidat_qualif (id_candidat, id_qualification)
VALUES (new_id,tableau_qualification[indice]);        indice := indice + 1;       }


 RETURN TRUE;    END;' LANGUAGE 'plpgsql';


-- 
AZ informatique
68 avenue Felix Faure 69003 Lyon
Tel : +33 (0) 472 844 949 direct : +33 (0) 472 844 956
Fax : 04 78 60 40 70