Преобразование csv в xls с использованием Data :: Table :: Excel?

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"]]);