Select Code to Download

use strict;
use warnings;
...

print “Read with Spreadsheet::XSLX\n";
print Dumper($excel) . “\n";

Read with Spreadsheet::XLSX :
$VAR1 = bless( {
...
                 'FmtClass' => bless( {}, 'Spreadsheet::XLSX::Fmt2007'
+ ),
                 'SheetCount' => 1
               }, 'Spreadsheet::ParseExcel::Workbook' );