Salut  
 
je voudrais parametrer l´ouverture pour lecture de certains fichiers, et cela de cette maniere:  
 
#################  
 
open (FIC, "<repertoire/docufinal.html" ) || die "error: cannot read file";  
 
 
foreach my $value(@file){  
$cpt=$cpt+1;  
open (FILE$cpt, "<repertoire/docu$cptinitial.html" ) || die "error: cannot read file";  
 
@file$cpt=<FILE$cpt>;  
 
print FIC @file$cpt;  
 
}  
 
close(FIC);  
 
$cpt=0;  
foreach my $value(@file){  
$cpt=$cpt+1;  
close(FILE$cpt);  
}
 
##################  
 
le nombre de fichiers (docu1initial.html ,docu2initial.html ...) variant, j peux fixer le nombre ds le programme, foit tout d´ábord savoir combien sont present ds le repertoire courant et les mettre ds un tableau (@file), ensuite parcourir le tableau pr traiter 1 a 1 ($value(@file))  
 
Mais j´ai ces messages d´erreur a l´execution:  
 
1-Scalar found where operator expected at ./prog.pl line 1409 near    
@file$cpt  
 
(Missing operator before $cpt?)  
 
2-Missing comma after the first argument to open function at ./prog.pl line 1407, near " "<repertoire/docu$cptinitial.html" ) "  
 
je ne vois pas les pieges , quelqu´un pourrai aider?  
 
a bientot

Franchement, j'ai pas compris ton explication et pour que ton code marche il faudrait de longues heures d'explications. Alors j'ai pris ce que tu as fais et je l'ai corriger. Maintenant a toi de comprendre ce que ca fait et si c'est bien ce que tu veux que ca fasse.
 
J'ai laisser certaine etape pour que cela ressemble un peu a ton programme d'origine.