推 LiloHuang:其實是Big5 不過DataDump為何輸出這樣的格式才是重點 06/03 08:53
推 LiloHuang:晚點考完試再來 trace 一下好了:P 06/03 08:53
推 travellu:可以囉！謝謝 06/03 11:34
※ 引述《travellu (旅行)》之銘言：
: ※ 引述《dorwell (這真的是很神奇~~)》之銘言：
: 不好意思又來問了
: 請問
: "張惠妹"這三個字是如何轉成"%Bli%B4f%A9f"？
: ^^^^^^^^^^^^
: 不曉得這是什麼格式
: 謝謝了
use Text::Iconv;
use Data::Dump;
my @lists = split(/\/+[\n\r]+/, `env iconv --list`);
#print "$_\n" foreach (@lists);
my $str = "張惠妹";
foreach (@lists) {
my $converter = Text::Iconv->new("UTF-8", $_);
my $converted = $converter->convert($str);
print "$_ =>", Data::Dump->dump($converted), "\n";
}
# perl enc.pl | grep A9
BIG-5 =>("Data::Dump", "\xB1i\xB4f\xA9f")
BIG-FIVE =>("Data::Dump", "\xB1i\xB4f\xA9f")
BIG5-HKSCS =>("Data::Dump", "\xB1i\xB4f\xA9f")
BIG5 =>("Data::Dump", "\xB1i\xB4f\xA9f")
BIG5HKSCS =>("Data::Dump", "\xB1i\xB4f\xA9f")
BIGFIVE =>("Data::Dump", "\xB1i\xB4f\xA9f")
CN-BIG5 =>("Data::Dump", "\xB1i\xB4f\xA9f")
CP950 =>("Data::Dump", "\xB1i\xB4f\xA9f")
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.114.64.130