Excel ファイル (xlsx または xls) からデータを解析しようとしています。
取得したいワークシートは既にわかっているので、それらを反復処理してデータを抽出したいと思います。
私のコード:
#!/usr/bin/perl -w
use strict;
use warnings;
use Spreadsheet::Read;
use Getopt::Long;
my $inputfile;
GetOptions (
'i=s' => \$inputfile,
);
die 'missing input file' unless $inputfile;
my $workbook = ReadData ($inputfile, debug => 9);
my @worksheets = (1);
foreach (@worksheets) {
my $sheet = $workbook->[$_-1];
next unless $sheet;
my ( $row_min, $row_max ) = $sheet->row_range();
my ( $col_min, $col_max ) = $sheet->col_range();
for my $row ($row_min .. $row_max) {
}
}
ただし、次のようになります。
Can't call method "row_range" on unblessed reference at perl/parse_test.pl line 22.
私は perl に非常に慣れていないため、ハッシュ、配列、および参照の複雑さをまだ理解していません。