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