perl 裡面處理 excel

原文請參考用 perl 產生 excel 檔一文。

我還蠻喜歡 perl 的，不過好久沒機會用了，看到這篇報導就推一推，以後要查也方便許多。用 perl 的機會通常是寫 CGI, 當你在網頁上要讓使用者「下載」一堆數據，用 excel 是個不錯的辦法。該文有講解怎麼產生，這邊就稍微貼一下，有興趣的人還是看原文較優些。

最重要的關鍵是

use Spreadsheet::WriteExcel; # 引用 Excel 套件
my $workbook = Spreadsheet::WriteExcel->new("-"); # 產生工作簿
my $worksheet = $workbook->add_worksheet("Cover Sheet"); # 產生 worksheet


要加入資料的話就像這樣

$worksheet->write(5, 0, "Division Number:", $bold);
$worksheet->write(5, 1, $division_number);


上面的 $bold 是格式，用法範例如下，當然要在使用者就準備好，這邊只是解說順序才擺後面：

my $bold = $workbook->add_format();
$bold->set_bold();

在用完要輸出前，要先 close:
$workbook->close();