S
Santana
Hei friends,
i'am new in newbie in Perl, and i try i convert a excel file in csv
file in Suse 10.0 linux.
I install the Spreadsheet-ParseExcel-0.32.tar.gz module in my linux
but when i try run this script :
use strict;
use Spreadsheet:arseExcel;
my $excel = Spreadsheet:arseExcel::Workbook->Parse($file);
foreach my $sheet (@{$excel->{Worksheet}}) {
printf("Sheet: %s\n", $sheet->{Name});
$sheet->{MaxRow} ||= $sheet->{MinRow};
foreach my $row ($sheet->{MinRow} .. $sheet->{MaxRow}) {
$sheet->{MaxCol} ||= $sheet->{MinCol};
foreach my $col ($sheet->{MinCol} .. $sheet->{MaxCol}) {
my $cell = $sheet->{Cells}[$row][$col];
if ($cell) {
printf("( %s , %s ) => %s\n", $row, $col, $cell-
}
}
}
I have a error something like this :
"Can´t locate Spreadsheet.pm in @INC(@INC constains : ............"
Can you help me, please ??
Thanks,
Paulito
i'am new in newbie in Perl, and i try i convert a excel file in csv
file in Suse 10.0 linux.
I install the Spreadsheet-ParseExcel-0.32.tar.gz module in my linux
but when i try run this script :
use strict;
use Spreadsheet:arseExcel;
my $excel = Spreadsheet:arseExcel::Workbook->Parse($file);
foreach my $sheet (@{$excel->{Worksheet}}) {
printf("Sheet: %s\n", $sheet->{Name});
$sheet->{MaxRow} ||= $sheet->{MinRow};
foreach my $row ($sheet->{MinRow} .. $sheet->{MaxRow}) {
$sheet->{MaxCol} ||= $sheet->{MinCol};
foreach my $col ($sheet->{MinCol} .. $sheet->{MaxCol}) {
my $cell = $sheet->{Cells}[$row][$col];
if ($cell) {
printf("( %s , %s ) => %s\n", $row, $col, $cell-
}{Val});
}
}
}
I have a error something like this :
"Can´t locate Spreadsheet.pm in @INC(@INC constains : ............"
Can you help me, please ??
Thanks,
Paulito