From fd3b47e616df71293bb6d3219697b15f2c86ca79 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Thu, 14 Jul 2016 21:56:28 -0500
Subject: [PATCH] open files using utf8

---
 txt2xls | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/txt2xls b/txt2xls
index 8958004..6ac3a94 100755
--- a/txt2xls
+++ b/txt2xls
@@ -147,7 +147,7 @@ for my $file (@ARGV) {
 	$file = "STDIN";
     }
     else {
-	$fh = IO::File->new($file,'r') or
+	open($fh,'<:encoding(utf8)',$file) or
 	    die "Unable to open $file for reading: $!";
     }
     my $ws_name = $file;
-- 
2.39.2