咨询Perl 6读写XLSX文件的可用模块及XLSX-Writer适用性

我来帮你梳理下Perl 6生态里处理XLSX文件的靠谱选择：

写入XLSX文件：XLSX-Writer完全可用 #

你找到的XLSX-Writer是目前Perl 6里最成熟的XLSX写入模块，完全可以用来生成和更新Excel文件，放心用就好。

• 安装方式很简单，用Perl 6的包管理器zef执行：zef install XLSX-Writer
• 简单上手示例：

use XLSX::Writer;

# 创建工作簿
my $workbook = XLSX::Writer.new(filename => 'my-output.xlsx');
# 添加工作表
my $worksheet = $workbook.add-worksheet('数据工作表');

# 写入单元格内容
$worksheet.write('A1', '姓名');
$worksheet.write('B1', '年龄');
$worksheet.write('A2', 'Alice');
$worksheet.write('B2', 30);

# 保存并关闭工作簿
$workbook.close;

读取XLSX文件：原生模块稀缺，两种替代方案 #

确实，目前Perl 6生态里还没有专门的原生XLSX读取模块，但有两种实用的替代方法：

方法1：通过Inline::Perl5调用Perl 5的成熟模块 #

Perl 5有很多稳定的XLSX读取工具，比如Spreadsheet::XLSX，我们可以用Inline::Perl5在Perl 6里无缝调用它：

1. 先安装Inline::Perl5：zef install Inline::Perl5
2. 确保你的系统上已经安装了Perl 5的Spreadsheet::XLSX（可以用cpanm Spreadsheet::XLSX安装）
3. 读取示例代码：

use Inline::Perl5;
use Spreadsheet::XLSX:from<Perl5>;

# 加载XLSX文件
my $excel = Spreadsheet::XLSX.new('my-input.xlsx');
# 遍历所有工作表
for $excel.worksheet -> $sheet {
    say "当前工作表：", $sheet.name;
    # 遍历每一行数据
    for $sheet.row -> $row {
        # 输出非空单元格内容
        say join ', ', $row.list.grep(*.defined);
    }
}

方法2：转成CSV后处理 #

如果你的需求不涉及复杂的Excel格式操作，可以先用命令行工具把XLSX转成CSV，再用Perl 6原生的CSV模块处理：

• 安装转换工具（比如xlsx2csv，可以用pip install xlsx2csv安装，需要Python环境）
• 执行转换命令：xlsx2csv my-input.xlsx my-output.csv
• 用Perl 6读取CSV：

use Text::CSV;

my $csv = Text::CSV.new;
for 'my-output.csv'.IO.lines -> $line {
    my @row = $csv.parse($line).list;
    say "行内容：", @row;
}

内容的提问来源于stack exchange，提问作者BhaskarS