perl读取excel文件内容

以下代码由PHP站长网 52php.cn收集自互联网

现在PHP站长网小编把它分享给大家，仅供参考

#!/usr/bin/perl -w
use strict;
use feature 'say';
use Spreadsheet::ParseExcel;  ####excel操作模块


my $parser   = Spreadsheet::ParseExcel->new();  
my $workbook = $parser->parse('12.xls');  ###打开excel文件

if (!defined $workbook) {
    die $parser->error(),".n";
}


my $worksheet = $workbook->worksheet('sheet2');  ###通常excel中可能会有几个工作表,选择一个当前excel的工作表

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);  ###几行几列单元格的值
		say $cell;
	}
}

以上内容由PHP站长网【52php.cn】收集整理供大家参考研究

如果以上内容对您有帮助，欢迎收藏、点赞、推荐、分享。

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!