summaryrefslogtreecommitdiff
path: root/bin/comirror
diff options
context:
space:
mode:
Diffstat (limited to 'bin/comirror')
-rwxr-xr-xbin/comirror1
1 files changed, 1 insertions, 0 deletions
diff --git a/bin/comirror b/bin/comirror
index 106e7c3..378c171 100755
--- a/bin/comirror
+++ b/bin/comirror
@@ -96,6 +96,7 @@ sub file_to_hash {
}
open(my $fh, '<', $file) or die("Cannot read $file: $!\n");
+ binmode($fh, ':utf8');
while(my $line = <$fh>) {
$line =~ / ^ (?<key> \S+ ) [[:space:]]+ (?<value> .*) $ /x or next;
$return{$+{key}} = $+{value};