perl读取Gbase数据GBK格式汉字，到服务器打印乱码处理

数据库是GBK格式，服务器为 UTF-8格式，从数据库读取汉字后变成乱码，

处理如下 perl 脚本：

本次问题应该将读取到服务器的乱码转换为 GBK格式。

此处 $line 为 从GBase数据库读取表的某一列，亲测有效

use Encode;

$line = encode("gbk", decode("utf8", $line));

use Encode;
#gbk转uft-8：
$line = encode("utf-8",decode("gbk",$line));
#或
$line = encode_utf8(decode("gbk",$line));
#utf-8转gbk：
$line = encode("gbk", decode("utf8", $line));
#uft-8转gb2312：
$line = encode("gb2312", decode("utf8", $line));