Perl將數據從哈希轉儲到電子表格

Question

我有一個鍵和Values（array）的哈希。 我想將它們轉儲到電子表格

%hash
   key1 -> foo bar 
   key2-> john adam gill
   key3-> apple banana mango orange

碼：

use strict;
use warnings;
use Excel::Writer::XLSX;

my $workbook = Excel::Writer::XLSX->new( 'c:\TEMP\filename.xlsx' ); 
my $worksheet = $workbook->add_worksheet();

my $row = 1;
my $col = 1;

foreach my $k (keys %hash)
{
    $worksheet->write($row, $col)->{Value} =  $k;                # title
    $worksheet->write($row, $col++,)->{Value} =  $hash{$k};     # value
    $row++;
}

電流輸出
無法在未定義的值上調用方法“ add_worksheet”

期望的輸出

Answer 1

看來Excel::Writer::XLSX->new失敗了。 在調用new ，添加以下代碼，以查看出了什么問題：

if (not defined $workbook)
{
    die "Failed to create spreadsheet: $!";
}