#!/usr/bin/perl -w

    use strict;
    use Spreadsheet::WriteExcel;

    my $workbook  = Spreadsheet::WriteExcel->new("test.xls");

    my $worksheet = $workbook->add_worksheet();


    $worksheet->write       ('A1', 12345);
    $worksheet->write_string('A2', 12345);


    __END__