Select Code to Download

my $Excel = Win32::OLE->new('Excel.Application') or die "Could not sta
+rt excel";

...
my $Book = $Excel->Workbooks->Open ( "$file" ) 
    or die "$! : $file\n"; # open Excel file

found
readable
writable
Software error:
Bad file descriptor : E:/www/aglocal/Inlook/excel/facture.xls