Perl MIME :: Lite發送空的Excel文件

Question

我正在使用Spreadsheet :: WriteExcel在perl中創建一個excel文件。 我的代碼是這樣開始的

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

將一些數據添加到workSheet

接着

$workbook->close() or die "Error closing file: $!";

但是我得到的Excel文件只包含一行錯誤信息

我的MIME附件代碼是這樣的

$msg->attach(
Type        => 'application/vnd.ms-excel',
Path        => $sNoticeFile,
Disposition => "attachment",
);

有人可以告訴我代碼中缺少什么/錯誤嗎？ 謝謝

Answer 1

我解決了這個問題。 我的行計數器未在正確的位置遞增。 它總是將新數據從數據庫寫入第二行。

謝謝大家