use Spreadsheet::WriteExcel;

my $excel = "/home/xxx/excel.xls";
my $workbook = Spreadsheet::WriteExcel->new($excel);