[英]Perl dump data from a hash to a spreadsheet
我有一个键和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”
期望的输出
看来Excel::Writer::XLSX->new
失败了。 在调用new
,添加以下代码,以查看出了什么问题:
if (not defined $workbook)
{
die "Failed to create spreadsheet: $!";
}
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.