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

ce message se destine plutôt pour la cat prog, section perl à mon avis.