perl - 为什么 Perl 的 Spreadsheet::ParseExcel 永远不会从 $parser->parse ('test.xls' 返回)？

Question

该电子表格与 Excel 97-2003 兼容，权限为 777

use strict;
use Spreadsheet::ParseExcel;
print "Content-type: text/html\n\n";   
my $parser   = Spreadsheet::ParseExcel->new();
print "<br>gets here:".__LINE__; 
my $workbook = $parser->parse('test.xls');
print "<br>never gets here:".__LINE__; 

Answer 1

你用最新的Spreadsheet::ParseExcel ?当前版本是 0.57。

我看到您将其作为 CGI 运行。您可以从命令行(本地，使用相同的测试文件)运行它并检查是否有任何错误消息？

也尝试使用 eval (从命令行运行仍然更好)并检查 $parser 是否已定义:

print '$parser is undef<br>' unless defined $parser;
eval {
  my $workbook = $parser->parse('test.xls');
};
print "Error message from eval: $@<br>";

尝试另一个 Excel 文件。

如果错误仍然未知并且使用特定的 Excel 文件，请在 bug tracker 中报告错误.