Spreadsheet::ParseExcel

Perl

Spreadsheet::ParseExcel - search.cpan.org

エクセルの中身を開いて確認とか出来てかなり便利。

use Spreadsheet::ParseExcel;
use Spreadsheet::ParseExcel::FmtJapan;

my $excel = Spreadsheet::ParseExcel->new;
my $format = Spreadsheet::ParseExcel::FmtJapan->new(Code => 'sjis');
my $workbook = $excel->Parse($excel_file,$format);
ワークシートのオブジェクトを配列で返してくれる。
my @work_sheets = $workbook->worksheets();
my $worksheet = $workbook->worksheet(0);
my ($min_gyou,$max_gyou ) =  $worksheet->row_range();
	$line_infos{$gyou}{VERSION}     = $worksheet->get_cell($gyou, 0)