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>)'


--
Jarkko Hietaniemi <[EMAIL PROTECTED]> http://www.iki.fi/jhi/ "There is this special
biologist word we use for 'stable'. It is 'dead'." -- Jack Cohen



Reply via email to