如何使用perl在excel xls文件上保存数据？

cpan install Spreadsheet::ParseExcel

#!/usr/bin/perl

use strict;
use warnings;
use Spreadsheet::ParseExcel;

# 读取Excel文件
my $parser = Spreadsheet::ParseExcel->new();
my $workbook = $parser->parse('example.xls');

# 获取工作表
my $worksheet = $workbook->worksheet(0);

# 保存数据
my ($row_min, $row_max) = $worksheet->row_range();
my ($col_min, $col_max) = $worksheet->col_range();

for my $row ($row_min .. $row_max) {
    for my $col ($col_min .. $col_max) {
        my $cell = $worksheet->get_cell($row, $col);
        next unless $cell;

        my $value = $cell->value();
        # 在此处处理和保存数据
        print "Row: $row, Col: $col, Value: $value\n";
    }
}