Software error:
Could not open Excel spreadsheet file 'test.xls': Bad file descriptor at /usr/lib/perl5/site_perl/5.8.6/Spreadsheet/BasicRead.pm line 306.
For help, please send mail to the webmaster (user@localhost.localdomain), giving this error message and the time and date of the error. 

##</code><code>##

#!/usr/bin/perl

use CGI::Carp qw(fatalsToBrowser);
use CGI;
use Spreadsheet::BasicRead;

my $cgi = CGI->new();

print $cgi->header;

my $xlsFileName = 'test.xls';

my $ss = new Spreadsheet::BasicRead($xlsFileName) ||
       die "Could not open '$xlsFileName': $!";

my $row = 0;
while (my $data = $ss->getNextRow())
{
   $row++;
   print join(',', $row, @$data), "\n";
}