Path: ...!news.nobody.at!2.eu.feeder.erje.net!feeder.erje.net!proxad.net!feeder1-2.proxad.net!cleanfeed1-a.proxad.net!nnrp5-1.free.fr!not-for-mail
Newsgroups: fr.comp.lang.perl
X-Mozilla-News-Host: news://news.free.fr:119
From: kurtz le pirate <kurtzlepirate@free.fr>
Subject: Remplacement avec increment
Organization: Compagnie de la Banquise
Date: Sat, 4 Mar 2023 11:00:08 +0100
User-Agent: Mozilla/5.0 (Macintosh; Intel Mac OS X 10.10; rv:78.0)
 Gecko/20100101 Thunderbird/78.14.0
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Language: fr
Content-Transfer-Encoding: 8bit
Lines: 36
Message-ID: <640316a8$0$24798$426a74cc@news.free.fr>
NNTP-Posting-Date: 04 Mar 2023 11:00:08 CET
NNTP-Posting-Host: 90.107.43.253
X-Trace: 1677924008 news-1.free.fr 24798 90.107.43.253:50930
X-Complaints-To: abuse@proxad.net
Bytes: 1618

Hello,


J'ai ce genre de données :
{ 16, 10, 53, 36, 29 }
{ 16, 41, 45, 34,  1 }
{ 17, 11, 52, 37, 28 }
{ 17, 40, 44, 34,  0 }
....

J'essaye de le transformer en :

#declare f[0] = "16,10,53,36,29";
#declare f[1] = "16,41,45,34,1";
#declare f[2] = "17,11,52,37,28";
#declare f[3] = "17,40,44,34,0";
....

Mon souci vient de l'increment à mettre entre []
J'ai essayé plusieurs choses  dont celle la :

my $n = 0;
$data =~s/\{/#declare faces [$n++]/eg;

qui m'a l'air correcte... mais je récupere cette erreur :
Use of uninitialized value in substitution iterator in...

Je sèche un peu. Peut être une idée de quelqu'in ici ?
Merci




-- 
kurtz le pirate
compagnie de la banquise