C:\>perl -E "my $string=('data12.csv');$string=~ s/\d//g;say $string;
data.csv

C:\>perl -E "my $string=('data.csv');$string=~ s/\d//g;say $string;"
data.csv