my $workbook = Spreadsheet::WriteExcel->new("-");