Work-around for Perl bug #63402.
diff --git a/src/tools/afblue.pl b/src/tools/afblue.pl
index c98df34..33bba1e 100644
--- a/src/tools/afblue.pl
+++ b/src/tools/afblue.pl
@@ -17,7 +17,7 @@
use strict;
use warnings;
use English '-no_match_vars';
-use open ':std', ':locale';
+use open ':std', ':encoding(UTF-8)';
my $prog = $PROGRAM_NAME;