请教：程序读Excel的sheet名乱码如何解决？

naletive

hi，现在我遇到一个问题，请大家帮下忙。

开发平台：windows XP
开发工具：strawberryperl
PERL版本：5.14.2

我写了一个批量解析excel文件的perl程序。

#test.pl
my $Format = Spreadsheet:arseExcel::FmtUnicode->new(Unicode_Map => 'CP936');
my $parser = Spreadsheet:arseExcel->new();
my $workbook = $parser->parse("$bookname",$Format);

foreach my $worksheet ($workbook->worksheets()) {
                my $sheetname = $worksheet->get_name();
                print "sheetname=$sheetname\n";
}

直接运行该程序 perl test.pl ，程序正常打出excel文件的每个sheet名字（这里的sheet名字是中文字符）。
由于需要将该程序弄成二进制形式（不开放源码），我安装了PAR:ACKER模块，使用如下命令转换该文件：

pp -o test.exe test.pl

结果，执行生成的test.exe文件时，打出来的sheet名是乱码格式。


想请教下有没有前辈曾经做过或者留意过这方面的信息，希望不吝赐教。

或者不使用这种打包方法，用别的方法的也请您指教下。

先行谢过！

兰花仙子

fan flw's tiezi

naletive

先谢版主给我回复，可是？没看懂啊，我不是经常逛CU， sorry，是翻flw的帖子吗？flw是谁啊。回复 2# 兰花仙子


   

kk861123

兰花仙子 发表于 2012-06-05 14:17
fan flw's tiezi

仙子的电脑这是肿么了，拼音都上了