Christian Kruse: Konvertierung ASCII - UTF8

Beitrag lesen

Hallo JO,

weiss jemand wie man in Perl eine Zeichenkette von ASCII
nach UTF8 konvertieren kann?

Dafuer gibt es bestimmte Module, z. B. Unicode::MapUTF8
Ansonsten tut es fuer Perl < 5.8 dieser Ausdruck (aus
Encode::Plain von Andy Malo):

$string =~ s
    {([\x80-\xff])}
    { chr((ord ($1) >> 6) | 192)
     .chr((ord ($1) & 191))
    }eg;

Gruesse,
 CK