Hi, it didn't make any difference with or without CGI, I fixed the "die" method as well, but I still have the problem with the code I posted, any suggestion?

#!/usr/bin/perl -w  
 
use strict;  
use CGI qw( -oldstyle_urls :standard );
use CGI::Carp qw ( fatalsToBrowser );  
use Spreadsheet::ParseExcel;

my $f_to_parse = "accounts.xls";

my $parser   = Spreadsheet::ParseExcel->new();
my $workbook = $parser->parse($f_to_parse);

#my $workbook = Spreadsheet::ParseExcel::Workbook->Parse($f_to_parse)o
+r die "Unable to open $f_to_parse\n";

if ( !defined $workbook ) {
        die "Got error code ", $parser->error_code, ".\n";
    }

for my $sheet (@{$workbook->{Worksheet}}) {
    print "Sheet: ", $sheet->{Name}, "\n";
}

#Result:
#Sheet: Sheet1
#Sheet: Sheet2
#Sheet: Sheet3
[download]

Thanks!