Select Code to Download

Hi All,
I am having trouble with a very simple Perl process.  I am basically q
+uerying an oracle database and I want to load it into excel.  I have 
+been able to use DBIx::Dump and it works.  However, I need to be able
+ to use a variety of excel formatting tools.  And I think Spreadsheet
+::Writeexcel is the best module that outputs to excel that allows me 
+do more formatting.  Below is the code and the error I am getting.  I
+ basically query oracle, fetch the data, load into an array and try t
+o write to excel.  For some reason it is doing some kind of compare a
+nd it does not like the data types.  For example, the date is '25-OCT
+-08'.  The SVP is 'S01'.  It seems to be saying that they are not num
+eric.  I know you are busy, but can you please help me with this prob
+lem.  Any help will be greatly appreciated.  Once I can get the data 
+into a spreadsheet, I can play around with the automation and excel f
+ormatting.  Thanks you!

Error says: "Argument "01-NOV-08" isn't numeric in numeric ge <>=> at 
+C:/Perl/site/lib/Spreadsheet/WriteExcel/Worksheet.pm line 3414.
Argument "01-NOV-08" isn't numeric in pack ge <>=> ge <>=> at C:/Perl/
+site/lib/Spreadsheet/WriteExcel/Worksheet.pm line 2157.

#!/usr/bin/perl -w 

...
print "DONE \n"; 
$sth->finish(); 
$dbh->disconnect();