Parsing large excel file

[Anonymous Monk]

I'm trying to parse a large excel file - around 50MBytes (22 cols - unknown rows ).

I have tried Spreadsheet::ParseExcel, but it just hugs memory & cpu without doing anything ... even with a simple script like:

#!/usr/bin/perl -w
use strict;
use Spreadsheet::ParseExcel;
$|++;
my $parser   = Spreadsheet::ParseExcel->new();
my $workbook = $parser->parse('1.xls');

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

my $worksheet = $workbook->worksheet(0);

my $cell = $worksheet->get_cell(1,1);
print "value: ", $cell->value();

My target is to load this info into MySQL if there's a simpler method I would appreciate it.