Perl读写Excel文档

在网上找的方法，使用Spreadsheet::ParseExcel读excel文件，用Spreadsheet::WriteExcel写Excel文件。具体的模块介绍见http://search.cpan.org/~jmcnamara/Spreadsheet-WriteExcel-2.37/lib/Spreadsheet/WriteExcel.pm和http://search.cpan.org/~jmcnamara/Spreadsheet-ParseExcel-0.59/lib/Spreadsheet/ParseExcel.pm。

所以下使用过程中的问题吧。

1.中文字符问题：

往Excel文件中写入中文字符需要进行编码，否则写进去就是乱码，包括sheet，chart等的name属性也是这样子的。

解决办法：

use Encode;

my?$worksheet =?$workbook->add_worksheet(decode('gb2312',"中文字符"));

my $chart = $workbook->add_chart( type=>'line',name=>decode('gb2312',"图表名称"));

但是奇怪的是 decode('gb2312','中文字符')用来赋值的话返回的是成功失败结果，也就是1.还没来得及去研究这个，所以先放下吧。

2.代码段注释问题

有的时候对代码进行精简，又不想删除原有代码，这个时候需要代码段注释

解决办法：

=cut/head/abc

...

=cut