# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1331184161 -7200
# Node ID bb00a40252e27cbc4294aaf7dedbb4d503b1942c
# Parent  4d9354abda73d08bfa5051f78d7816625919a8fd
Input in ISO-8859-1 and output in UTF-8.

diff -r 4d9354abda73 -r bb00a40252e2 parsedata.pl
--- a/parsedata.pl	Wed Nov 09 22:23:25 2011 +0200
+++ b/parsedata.pl	Thu Mar 08 07:22:41 2012 +0200
@@ -230,7 +230,7 @@
 
 
 my $data;
-open(my $fh, '<', $opt_filename) or die("Error opening '$opt_filename': $!\n");
+open(my $fh, '<:encoding(iso-8859-1)', $opt_filename) or die("Error opening '$opt_filename': $!\n");
 $data = do { local $/; <$fh> };
 close($fh);
 
@@ -357,6 +357,7 @@
   open(STDOUT, '>', $opt_outfile) or die("Could not open output file '$opt_outfile'.\n");
 }
 
+binmode STDOUT, ':encoding(utf-8)';
 
 ### Output data in desired format
 if ($opt_mode eq "php") {