Select Code to Download

use Spreadsheet::WriteExcel;

...
$worksheet = $workbook->add_worksheet('ws name');
$worksheet->write(0,0,'something in a1');
$workbook->close();

use IO::File;
use Spreadsheet::WriteExcel;
...

$infile->close();
$workbook->close();