Select Code to Download

#!/usr/bin/perl -w

...
my $worksheet3 = $workbook3->addworksheet();
$worksheet3->write(0, 0,  "Hi Excel!");
$workbook3->close();

    # Untested
    tie *XLS => 'Apache';
    my $workbook = Spreadsheet::WriteExcel->new(\*XLS);