作者audreytang (Audrey)
看板perl
標題Re: [討論] 我的 Big5 轉 UTF-8 的簡單程式
時間Sat Sep 16 09:48:24 2006
use Encode;
use Encode::Guess qw(big5 utf-8);
binmode(FH, ':encoding(Guess)');
# Or:
my $decoded = decode('Guess', $text);
__END__
Audrey
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.228.165.52
※ 編輯: audreytang 來自: 220.228.165.52 (09/16 09:49)
1F：→ audreytang:另外也可以參考Encode::HanDetect 09/16 12:49