Thanks for answer.
yes I looked section on "Reducing the memory usage of Spreadsheet::ParseExcel" but I'am novice in Perl and I don't know how put this code:
#!/usr/bin/perl -w
use strict;
use Spreadsheet::ParseExcel;
my $parser = Spreadsheet::ParseExcel->new(
CellHandler => \&cell_handler,
NotSetCell => 1
);
my $workbook = $parser->parse('file.xls');
sub cell_handler {
my $workbook = $_[0];
my $sheet_index = $_[1];
my $row = $_[2];
my $col = $_[3];
my $cell = $_[4];
# Do something useful with the formatted cell value
print $cell->value(), "\n";
}
and how adapt it for my code.
I have spend a lot of hours but nothing...
help me please :( |