Select Code to Download

    #!/usr/bin/perl -w

...
        $csv->combine(@$aref);
        print CSV $csv->string(), "\r\n";
    }

    #!/usr/bin/perl -w

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

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