Unicode::String::utf16($utf16)->utf8;

Google 群組：查看留言及回應
"謝謝! 謝謝您的指導，已成功了。附下程式碼如下： #!/usr/local/bin/perl use Unicode::String; use Unicode::Map; my $map = new Unicode::Map('cp950'); $input="這是一個測試"; $utf16=$map->to16($input); $utf8=Unicode::String::utf16($utf16)->utf8; print $utf8; 原來我原先有些多餘的程式碼。另一方面，我的電腦上用 cp950 和 BIG5 現在都可以。 Have a nice day!"
http://groups.google.com/groups?hl=zh-TW&lr=&c2coff=1&frame=right&th=d27c7a777603077f&seekm=3iSbYh%24b45%40www.kkcity.com.tw#s