in reply to Re^4: iso-8859-1 code converter
in thread iso-8859-1 code converter

I think I've got it now, but I still don't know how I can get this decimal value in Perl. If I pass a utf8 string to ord(), it gives me a value for each byte, not the double-byte character.

Only if perl doesn't know that the string really is utf8. If the string is coming from a data file, and you open that file without telling perl specifically what type of encoding to use for it, perl reads data from the file as bytes, and you need to decode() the string (using the Encode module) so that perl will see it properly converted/interpreted as utf8 characters, and the scalar variable holding the string will be flagged as such. Note the following:

# open an euc-jp file: open( $inp, "<:encoding(euc-jp)", "some_file.euc" ) or die "$!"; while (<$inp>) { # data will be decoded on input ... # so $_ will have its utf8 flag "on" and # s///, ord(), etc will use character semantics } # open a utf8 file: open( $inp, "<:utf8", "some_file.utf8" ) or die "$!"; while (<$inp>) { # data will be interpreted as utf8 on input ... # so $_ will have its utf8 flag "on" and... (same as above) }

If your string is based on some literal value in your perl script file, you have to make sure that the editor you use to compose the source code is saving the script as a utf8 file (and you probably need to put use utf8; in the script, so perl knows how to interpret the literal utf8 characters that it contains).