Regex? $var =~ s/\b\**\**\b//; # deletes *
-------------- Bob Erinkveld (Webmaster Insane Hosts) www.insane-hosts.net MSN: [EMAIL PROTECTED]
From: Max <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED]
Subject: Spreadsheet::ParseExcel date problem (year is being reformatted)
Date: Tue, 10 Dec 2002 16:50:04 +0100
When I read an Excel file in, ParseExcel reformates the year to dd-mm-*yy* (for example 10 dec 2002 is 10-12-*02*).
I don't want this to happen, the format should stay the way it was dd-mm-*yyyy* (10-12-*2002*).
Here is the code:
use Spreadsheet::ParseExcel; # Spread-ParseExcel [0.26]
my $oExcel = new Spreadsheet::ParseExcel;
my $oBook = $oExcel->Parse('mail/file.xls');
my($iRow, $iColom, $oWorkSheet, $oSheetCR);
my $iSheet=0;
my @string; $oWorkSheet = $oBook->{Worksheet}[$iSheet];
for (my $iRow = $oWorkSheet->{MinRow}; defined $oWorkSheet->{MaxRow} && $iRow <= $oWorkSheet->{MaxRow} ; $iRow++){
for(my $iColom = $oWorkSheet->{MinCol} ; defined $oWorkSheet->{MaxCol} && $iColom <= $oWorkSheet->{MaxCol} ; $iColom++) {
$oSheetCR = $oWorkSheet->{Cells}[$iRow][$iColom];
push @string,$oSheetCR->Value if ($oSheetCR);
}
}
Any help is appreciated,
Max
_________________________________________________________________
Ontvang je Hotmail & Messenger berichten op je mobiele telefoon met Hotmail SMS http://www.msn.nl/jumppage/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
