in reply to Re: ParseExcel Again
in thread ParseExcel Again
Its normal code to parse .xls
$excelRowCounter=0; my $parser = Spreadsheet::ParseExcel->new( CellHandler => \&excelCellhandle +r, NotSetCell => 1, Parameters => "XXXXXXXXX" ); $parser->parse($currentFile); sub excelCellhandler { # my $workbook = $_[0]; # my $sheet_index = $_[1]; my $row = $_[2]; # my $col = $_[3]; my $cell = $_[4]; my $q; if($excelRowCounter == $row) { $q = $cell->unformatted(); $text .= $v; } else { if(length($text) > 2097152) { do something return } $excelRowCounter = $row; $q = $cell->unformatted(); $text .= $v; } }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^3: ParseExcel Again
by tmharish (Friar) on Feb 13, 2013 at 11:20 UTC | |
by Anonymous Monk on Feb 13, 2013 at 11:36 UTC | |
by marto (Cardinal) on Feb 13, 2013 at 11:46 UTC | |
by ww (Archbishop) on Feb 13, 2013 at 12:09 UTC |