获取perl中excel工作表的名字

我是编码和Perl的新手。

我正在尝试通过Perl读取excel文件中的excel工作表的名称

以下是我的代码

#!/usr/local/ActivePerl-5.12/bin//perl -w use strict; use Spreadsheet::ParseExcel; my $FileName = "/Users/labuser/Desktop/TestAutomation/Results.xls"; my $parser = Spreadsheet::ParseExcel->new(); my $workbook = $parser->parse($FileName); die $parser->error(), ".\n" if ( !defined $workbook ); for my $worksheet ( $workbook->worksheets() ) { print $worksheet; } 

但我不能通过打印$工作表获取工作表的名称。 请build议我怎么得到这个

Answer 1

你需要使用：

 print $worksheet->get_name(); 

代替

 print $worksheet 

也使用foreach：

 foreach my $worksheet ($workbook->worksheets()) { print $worksheet->get_name(); }