#!/usr/bin/perl -w

    use strict;
    use Spreadsheet::WriteExcel;

    my $workbook  = Spreadsheet::WriteExcel->new('example.xls');
    my $worksheet = $workbook->add_worksheet();

    my $format    = $workbook->add_format(text_wrap => 1);

    $worksheet->write('A1',  "Hello\nWorld", $format);