使用 Perl Spreadsheet::ParseExcel 模块和 Perl Spreadsheet::WriteExcel 模块,如果单元格不为空,我正在尝试为具有列表值的单元格分配标量值。这样做的目的是将值 1 分配给具有列表值的单元格,以便我可以将多个列加在一起以得到一个包含该行总和的新列。
例如:
A B C D E(Sum Column)
Row2 科学 数学 历史 戏剧 4
第 3 行数学空白科学空白 2
Row4 历史科学英语空白 3
因此,如果单元格不是空白或“”,则分配值为 1,如果为空白,则分配值为 0。
我该怎么做这样的事情?