在Excel中将Excel文件发送到浏览器

Question

我创建了一个像这样的excel文件。

open(my $fh, '>', \my $reportfile) or croak "Failed to open filehandle: $!";

my $workbook = Excel::Writer::XLSX->new($fh);

我通过添加工作表向工作簿添加内容。 现在我想将此excel文件发送到浏览器进行下载。我正在使用下面的代码来做到这一点。但下载没有发生。

my $filename = 'Report.xlsx';

$main::Response->Clear();
$main::Response->{ContentType} = "application/vnd.openxmlformats-officedocument.spreadsheetml.sheet";
$main::Response->AddHeader("content-disposition", "attachment; filename=$filename");
$main::Response->{CacheControl} = 'private';
binmode STDOUT;
print $reportfile;