use warnings;
use strict;

use Spreadsheet::WriteExcel;

# Create a new Excel workbook
my $workbook = Spreadsheet::WriteExcel->new("perl.xls");
my $worksheet = $workbook->add_worksheet('Test');