我正在尝试使用 perl 将来自 excel 的数据解析为特定的 XML 格式,该格式由另一个应用程序读取,然后创建数据的图形表示。数据采集器会定期更新 Excel 表。我选择了 Spreadsheet::Read 模块,但我遇到了问题。
工作表将被划分为特定的单元格,这些单元格对应于特定的布局。因此,该表将具有:
国家 | 城市 | 郊区 | 关联
每行是不同的数据等。
我试图告诉脚本让每一行都像这样。
use Spreadsheet::Read;
my $book = ReadData ("Captured_input.xlsx");
my @rows = Spreadsheet::Read::rows ($book->[1]);
print "@rows\n";
然而,这会打印 ARRAY(和一些十六进制数据)但是,我希望它读取每一行和单元格并像这样返回它:
Country1, City1, Suburb1,link1
Country2, City2, Suburb2,link2
它每天运行,因此它不应该只读取文件末尾,它应该每次都读取整个工作表,因此如果进行了任何更改,它将重新发布 XML。
如果我这样使用它,它可以工作并返回数据,但是我需要手动指定每一行,但我无法估计将来会有多少行。
use Spreadsheet::Read;
my $book = ReadData ("Captured_input.xlsx");
my @row = Spreadsheet::Read::cellrow ($book->[1], 4);
print "@row\n,";
一些输入将不胜感激。