#!/usr/bin/perl
use warnings;
use strict;
use Spreadsheet::WriteExcel;
my $book = Spreadsheet::WriteExcel->new("perl.xls");
my $sheet = $book->addworksheet();
$sheet->write('A1', 'Hi Excel!');