[RESOLU] [Perl] Substitution de caractère

Posté(e) le 20 octobre 200618 a

Bonjour,

j'ai un soucis en perl, et je ne connais vraiment pas bien ce langage :(...

voici mon problème :

j'ai dans une variable nommé headline la valeure suivante :

BSC,SITE,CELL,Time,Alias,11601(Available SDCCH total number),11602(Unavailable SDCCH total number),11603(SDCCH attempt total number), ... (les ... ça veut dire qu'il y a encore d'autres "," derrière...)

j'aimerai transformer cette chaine en :

BSC,SITE,CELL,Time,Alias,c11601,c11602,c11603, ...

en gros je veux mettre des "c" devant les chiffres et enlever la fin de la chaine jusqu'au prochain séparateur ","

j'ai testé :

$headline =~ s/(\d+\()/c$1/g;

mais j'ai comme résultat :

BSC,SITE,CELL,Time,Alias,c11601,c11602(Unavailable SDCCH total number),c11603(SDCCH attempt total number),...

donc j'ai toujours les parenthèses avec la description que je ne veux pas :( , le traitement correct a été fait que sur la 1ère valeure matchée et sur les autres j'ai juste les "c".

comment je puis-je me dépatouiller ?

quelqu'un a t'il une idée ??

par avance je vous remercie

Modifié le 23 octobre 200618 a par steve419

Citer

Posté(e) le 21 octobre 200618 a

$headline =~ s/(\d+)[^,]*/c$1/g;

Citer