Bonjour,

Je souhaiterai lister les fichiers contenu dans un répertoire et pour chacun de ces fichiers, les renommer, en écrivant la valeur 1 devant puis le nom du fichier. Je sais les renommer, mais je ne sais pas commet m'y prendre pour la boucle.
Déjà, je rencontre un probléme, lorsque, je liste mes fichiers , l'affichage, j'ai nomfichier.txt.txt, alors que dans mon explorateur, l'extansion n'appairait qu'une seule fois. D'autre part, quels sont les commandes pour récupérer le repertoire et le fichier (basename, dirnames sous unix).

début script :
my $Rep = "c:/Perl/traite" ;
my $toto= "" ;

$toto = join ("\n", glob ("$Rep/*.*"));
print $toto ;

Merci d'avance pour vos réponses.