使用Data :: Table :: Excel将csv转换为xls？

Question

如何使用Data::Table::Excel将.csv转换为.xls文件格式。

我想要做的转换与tables2xls子程序：

my $t = Data::Table::fromFile("testresults-2013-07-01.csv"); 
my @arr = $t->csv; 
Data::Table::Excel::tables2xls("results.xls", $t ,\@arr); 

我试过上面的代码，但我没能得到我所期待的。

Answer 1

最后行必须是：

Data::Table::Excel::tables2xls("results.xls", [$t] ,["Sheet name for your Table"]); 

这里是颜色例如像你想：

Data::Table::Excel::tables2xls("results.xls", [$t] ,["Sheet name for your Table"], [["white","silver","gray"]]);