kalipso/racalmas
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

read config as UTF8

Browse Source
This commit is contained in:
Milan
2020-05-02 19:16:55 +02:00
parent e316b53462
commit 4229cb80ad
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
lib/calcms/config.pm
View File

@@ -4,6 +4,7 @@ use strict;
use warnings; use warnings;
no warnings 'redefine'; no warnings 'redefine';
use FindBin(); use FindBin();
#use base 'Exporter'; #use base 'Exporter';
@@ -30,7 +31,7 @@ sub read_config {
my @stack = (); my @stack = ();
my $entry = {}; my $entry = {};
open my $fh, '<', $file or die; open my $fh, '<:encoding(UTF-8)', $file or die;
while ( my $line = <$fh> ) { while ( my $line = <$fh> ) {
chomp $line; chomp $line;