Converting csv to xls using Data::Table::Excel?

Question

How do you use Data::Table::Excel for converting .csv to .xls file format.

I want to do the conversion with the tables2xls subroutine:

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

I tried the code above but I was not able get what I expected.

gangabass · Accepted Answer · 2013-07-02 14:24:42Z

2

Last line must be:

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

And here is colors example like you want:

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

edited Jul 2, 2013 at 14:24

answered Jul 2, 2013 at 11:12

gangabass

10.7k2 gold badges26 silver badges36 bronze badges

Sign up to request clarification or add additional context in comments.

3 Comments

Sérgio Over a year ago

wonderful, but need data encoded in windows cp1252 , with utf8 data I got encoding problems , any solution to work with utf8 data ?

gangabass Over a year ago

@Sérgio give me more details please. What is your source CSV encoding and what XLS encoding you expect?

Sérgio Over a year ago

@gangabass I have to do , something like : open(FCSV, ">:encoding(cp1252)", "$file.csv"); print FCSV $csv->string(); my $table = Data::Table::fromFile("$file.csv"); Data::Table::Excel::tables2xlsx("$BASExlsx", [$table], ["something"], [["white","silver","gray"]]); or utf-8 characters appears double encoding

Collectives™ on Stack Overflow

Converting csv to xls using Data::Table::Excel?

1 Answer 1

3 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

3 Comments

Your Answer

Sign up or log in

Post as a guest

Related