Salut a tous

vous m'avez aider
a renommer tous les fichiers d'un répertoire sous LINUX avec une commande en shell:

#! /usr/bin/perl -w

use strict;

my ($jour,$mois,$annee)=(localtime)[3,4,5];

my $j = sprintf("%02d",$jour);
my $m = sprintf("%02d",$mois+1);
my $a = $annee+1900;

my @fic = glob "/home/ovh/sauveDB/*.sql";
foreach (@fic){
(my $new_name = $_)=~ s/(\d+)(\.sql)/$1_$a-$m-$j$2/;
rename $_,$new_name;
}

mais lors de ma demande, je n'avais préciser que les fichiers sont sous la forme :

1.sql
2.sql
...
100.sql


alors que j'ai d'autres fichiers dans ce répertoire:

mysql.sql
compteur.sql
etc...

et la commande précédante ne les prends pas en compte...

pouvez vous me donner un coup de main supplémentaire...

Merci d'avance

laurent