Also wenn du mit Encode::decode ein Zeichen in Perls internes Format umwandelst, bekommst du mit ord() den Codepoint.

Perl 6 kann übrigens transparent zwischen den verschiedenen Leveln (Bytes, Code Points, Grapheme, CharLingua) umschalten (wenn es mal fertig ist...).