perl -e'
   use open ":std", ":encoding(UTF-8)";
   use utf8;
   use feature qw( say );
   $_ = "Å";
   utf8::encode($_);  # XXX Bug. Already handled by ":encoding".
   say;
'