Win XP + Active Perl 5.8.6を使っています。"え" という文字の
ユニコードを10進で（すなわち"12360"と）表示させようとしているの
ですが、下のルーチンではうまくいきません。どうすればよろしいでしょうか？

use utf8;
binmode STDOUT, ":encoding(cp932)";
binmode STDERR, ":encoding(cp932)";
binmode STDIN, ":encoding(cp932)";
use open IO => ":encoding(cp932)";
use Encode;

$char = "え";
printf "%s = %d", $char, encode("utf16", "え");