rfc1345convert: prevent output encoding warnings

Output is fixed code which should always be UTF-8, regardless of STDOUT
capabilities (as it's rarely shown directly).  Declare this to prevent
warnings about wide characters (or worse).

diff --git a/rfc1345convert b/rfc1345convert
index f6f0ab8a2f88a5230fa2e6f2ee127143a3423ec3..cae6d47b9014d2a67ecd32955a1f3fb15e868a14 100755 (executable)
--- a/rfc1345convert
+++ b/rfc1345convert
@@ -3,6 +3,7 @@
 use strict;
 use warnings;
 
 use strict;
 use warnings;
 

+use open OUT => ':utf8', ':std';

 use Data::Dumper;
 
 our $VERSION = '1.01';
 use Data::Dumper;
 
 our $VERSION = '1.01';