Select Code to Download

my $file = '06_Protection_de_la_tête.xml';

use File::Find::Rule;
my @files = File::Find::Rule->file->name('*.xml')->in('.');
my $file = shift @files;

use Encode;
my $file = decode('utf8', $file)

06_Protection_de_la_t�te.xml: No such file or directory