|
I have a similar problem; here is my test program:
#!/usr/bin/perl -w
use strict;
my $INFILE="test2-in.xls";
my $OUTFILE="test2.xls";
use Spreadsheet::ParseExcel;
use Spreadsheet::ParseExcel::SaveParser;
# Open an existing file with SaveParser
my $parser = new Spreadsheet::ParseExcel::SaveParser;
my $excel = $parser->Parse($INFILE);
# Save it
$excel->SaveAs($OUTFILE);
This program converts all numbers to text when it copies the spreadsheet. I think the bug is in Spreadsheet::WriteExcel, because Spreadsheet::WriteExcel::write_number() is being used for numbers, to no effect.
|