Pacify perlcritic.

Discussion: https://postgr.es/m/3271512.1680916423@sss.pgh.pa.us

diff --git a/contrib/fuzzystrmatch/daitch_mokotoff_header.pl b/contrib/fuzzystrmatch/daitch_mokotoff_header.pl
index 5426ffd000de702442360446484b389e71b794c2..6900987208f91284df4dba4915788bf0f0a4ed0e 100755 (executable)
--- a/contrib/fuzzystrmatch/daitch_mokotoff_header.pl
+++ b/contrib/fuzzystrmatch/daitch_mokotoff_header.pl
@@ -12,7 +12,7 @@ use strict;
 use warnings;
 
 use utf8;
-use open IO => ':utf8', ':std';
+use open IO => ':encoding(UTF-8)', ':std';
 use Data::Dumper;
 
 die "Usage: $0 OUTPUT_FILE\n" if @ARGV != 1;