#!/usr/bin/perl -w


    use strict;
    use Excel::Writer::XLSX;

    my $workbook   = Excel::Writer::XLSX->new( 'mytest.xlsx' );
    my $worksheet = $workbook->add_worksheet( 'testsheet' );

    write_me();


    sub write_me
    {
    my $text_format = $workbook->add_format(
        bold   => 1,
        italic => 1,
        color  => 'red',
        size   => 18,
        font   => 'Lucida Calligraphy'
    );


    my $result=$worksheet->write( 'A2', "Text" );
    print "my result = $result";
    #$worksheet->write( 'B3', "Hello Excel", $text_format );
    #$worksheet->write( 'B3', "Hello Excel");
    }

    __END__