Re,

voilà encore un version dans laquelle on n'a pas des références arrières. Un seul test avant pour tester l'extension fait l'affaire.

#! /usr/bin/perl -w

use strict;

foreach (glob "/home/ovh/sauveDB/*.sql"){
(my $new_name = $_)=~ s/(?=\.sql)/'_' . `date +%F`/e;
$new_name =~ s/\n//; # le résultat de date contient un \n
rename $_,$new_name;
}