我需要用perl把一些nos写到excel文件中。对于ex,假设编号为10、11.25、6.15。
我对11.25和6.15没有问题,因为它们是按原样编写的。但是我想把10写成10.00
我的代码是:
my $Amountformat = $workbook1->add_format();
my $Amountformat->set_num_format(0x02);
$worksheet1->write_number($row,$col,$Amount,$Amountformat);在这样做的时候,我得到的错误是"Can't call method "set_num_format“On an undefined value at header.pl”
我试着用
my $Amountformat->set_num_format('0x02'); and
my $Amountformat->set_num_format("0x02"); 但是我还是得到了同样的错误。
我的头文件正在使用
Spreadsheet::ParseExcel;
use Spreadsheet::WriteExcel;我无法理解错误的原因,因为我是perl的新手。你能帮我解决这个错误吗?或者告诉我一些替代方法,我可以在excel文件中把10写成10.00。
先谢谢你...
发布于 2018-08-04 11:41:07
这里的问题是,当您调用set_num_format时,使用my重新声明了$AmountFormat。第二次使用my $AmountFormat会创建一个新的未定义变量,该变量与旧的变量相同。移除第二个my,它应该可以正常工作。
您还应该添加
use strict;
use warnings;来阻止Perl允许这种情况发生。
https://stackoverflow.com/questions/51682177
复制相似问题