Correction du bug des accents mal encodés/affichés pour les titres des podcasts

This commit is contained in:
Frédéric Couchet 2019-05-14 11:27:54 +02:00 committed by Frédéric Couchet
parent 97a88b4e87
commit 90ce5cdfd5

View File

@ -4,6 +4,7 @@ use strict;
use Getopt::Long;
use JSON;
use Data::Dumper;
use utf8;
my ($help,$config,$verbose,$dryrun);
my $meta_data_script = "lav-outils/podcasts/scripts/make-metadata-image-podcast.sh";
@ -38,7 +39,7 @@ sub read_config {
my ($filename) = @_;
my $json_text = do { #read all the file in one shot
open(my $json_fh, "<", $filename)
open(my $json_fh, '<:encoding(UTF-8)', $filename)
or die("Can't open \$filename\": $!\n");
local $/;
<$json_fh>