using ParseExcel::Simple to get worksheet name

[aquinonez]

im trying to use Spreadsheet::ParseExcel::Simple to return the name of the
worksheet.
but all i get is something such as:
Spreadsheet::ParseExcel::Simple::_Sheet=HASH(0x39b8918)

what am i doing wrong?

code:

use strict;
use Spreadsheet::ParseExcel::Simple;
my $wkbook = "x:/traffic/temp_assay/site.xls";

my (@sheets,$dest,$sheet,$year,$date,@wktemp,$ath,$bth,$cth);
my $xls = Spreadsheet::ParseExcel::Simple->read("$wkbook");
foreach my $sheet ($xls->sheets) {
        @sheets = $xls->sheets;
        while ($sheet->has_data) {  
        my @data = $sheet->next_row;
        my $sheet = $sheets[0];
        print "$sheet\n";
}

thanks

Antonio Quinonez 
Traffic Analyst
Accessline Communications 



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]