运行perl代码以访问xlsx工作表时出现编译错误

时间:2014-10-16 22:58:28

标签: excel perl exception-handling

我有以下代码:

use strict; 
use warnings; 
use Text::Iconv; 
use Spreadsheet::XLSX; 
use Date::Format;

my $converter = Text::Iconv -> new ("utf-8", "windows-1251"); 

# Read the data from a file.
my $prod_otp = Spreadsheet::XLSX->new('/home/shahk/Book1.xlsx', $converter);   
if (!defined $prod_otp ) { 
   die $prod_otp->error(), ".\n" ; 
}

但是,当我尝试运行时,我收到以下错误:

Argument "#REF!" isn't numeric in int at /tools/oss/packages/Spreadsheet/XLSX/Fmt2007.pm line 94.

有人可以帮助我克服这种错误吗?

谢谢!

1 个答案:

答案 0 :(得分:1)

添加解析器Spreadsheet :: XLSX :: Fmt2007工作。我决定添加这个解析器,因为它显示的错误是在例程子FmtString {}中。至少,现在当我运行脚本时,我没有看到这个错误