Select Code to Download

#!perl
use strict;
...
$workbook->saveAs('c:\\temp\\Book1.xlsx',{FileFormat => 51}); #xlWorkb
+ookDefault
$workbook->Close();
$Excel->Quit();

<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
...
  </WorksheetOptions>
 </Worksheet>
</Workbook>