Du bekommst Zeichen aus einer externen Quelle. Externe Quellen liefern immer "bytes" oder "octets", die du nach "characters" konvertieren willst. Schau in der Encode-Manpage nach, welche von den beiden Methoden encode/decode von octets nach characters umwandelt (ich kann mir das nie merken, aber in allerneuesten Encode-Versionen gibt es bytes2str und str2bytes). Als Encoding gibst du dort das Encoding der externen Quelle, also in diesem Fall utf8 an.

Wenn du dein STDOUT bereits auf cp437 gesetzt hast, brauchst du nichst mehr weiter zu machen. Perl konvertiert dann für dich alles nach cp437, was nach STDOUT ausgegeben wird.

iso-8859-1 brauchst du hier gar nicht. Oder doch?\n\n

<!--EDIT|ptk|1173944259-->