perl split 中文 乱码问题

用split分割句子中的中文字符，本地两台机器完全没有问题，服务器死活都是乱码（这台机器默认编码的确是gbk）

后来做个尝试，句子decode，如果需要分割符，分隔符也要decode，输出的时候要encode，就正常了。

中间状态时乱码，那是perl自己认识的字节流，始、终状态是字符串。

use strict;
use Encode;
#输入文件是GBK编码
open(In,"<$ARGV[0]");
while(<In>){
chomp();
if($_ eq ""){
next;
}
print "$_\n"; #可视正常
my $char =decode('gbk',$_);
print"$char\n"; #不可视，乱码
my @array = split//,$char;
my $tmp=encode('gbk',$array[0]);
print "$tmp\n";#可视，正常
print "\n";
}
close(In);