Help for this page
use PerlIO::encoding; $PerlIO::encoding::fallback = Encode::FB_DEFAULT;
#!/usr/bin/perl use PerlIO::encoding; ... binmode STDOUT, ":encoding(UTF-8)"; while (<$fh>) { print }
foo bär