[Tokyo.pm] utf8 & perl5.6

[OKABE, Keiichi]

岡部です。

XML.comに載っていた "XML::Parser and Character Encodings"
を読んでいたらXML::UMというモジュールが最近できていて、

$encode = XML::UM::get_encode(Encoding => 'big5');
$encoded_string = $encode($utf8_string);

というので変換ができるそうです。これはXML::Expatの情報を
使っているので、Jcode.pmを使うより高速かもしれません。

# まだ試してないのでなんともいえない (^^;
---
use Tk;$c=tkinit->Canvas(-height=>50,-width=>100)->pack;$a="15115155,223342,
2343,3335,24254544,6163,5292918185,53939484,7273,6465757464";$a=~s/\s//g;
map{s/(\d)/sprintf("%s,",$1*10)/eg;$c->createLine(split /,/,$_)}(split /,/,$a);
MainLoop; #okabek ＠ beige.ocn.ne.jp