Net :: Telnet和中文字符

Question

使用Perl Net :: Telnet输出文本时，我很难处理（繁体）中文字符。例如，如果我连接到ptt.cc（基于台湾），则文本输出没有正确的字符编码。

这是一个非常简单的例子：

use Net::Telnet (); 
$t = new Net::Telnet; 
$t->open("ptt.cc"); 

$contents = $t->get;

print $contents;

exit;

有人可以帮忙吗？