At 12:43 am +0200 1/3/04, Jarkko Hietaniemi wrote:


Maybe I'm missing something...?

perl -le 'open(X, ">:encoding(ucs2be)", "ucs2be");print X chr(0x1234);close X'
perl -le 'open(X, "<:encoding(ucs2be)", "ucs2be");printf "%x\n", ord(<X>)'

No. It was me that was missing it :-)

Reply via email to