Perl-Dump-Daten von einem Hash in eine Tabelle

Question

Ich habe einen Hash mit Schlüssel und Werte (Array). Ich möchte, dass sie in eine Tabelle dump

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

Code:

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++; 
} 

Stromausgang
kann nicht rufen Methode "add_worksheet" auf einen nicht definierten Wert

gewünschte Ausgabe

Answer 1

Es scheint, dass fehlgeschlagen ist. Fügen Sie diesen Code nach dem Aufruf new, um zu sehen, was schief gelaufen ist:

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