The source is:C:\Documents and Settings\dln1\My Documents\PERL>perl excel.pl Can't call method "Open" on an undefined value at excel.pl line 16.
I verified the file exists and can be opened by excel. Any assistance in diagnosing the problem would be appreciated. Thanks, Danieluse OLE; $xlfile ='Book1.xls'; ##### OLE - Excel Connection # Create OLE object - Excel Application Pointer $xl_app = CreateObject OLE 'Excel.Application' || die $!; # Set Application Visibility # 0 = Not Visible # 1 = Visible $xl_app->{'Visible'} = 0; # Open Excel File $workbook = $xl_app->Workbooks->Open($xlfile); # setup active worksheet $worksheet = $workbook->Worksheets(1); # retrieve value from worksheet $cellA1 = $worksheet->Range("A1")->{'Value'}; $cellB1 = $worksheet->Range("B1")->{'Value'}; print "Cell A1 = $cellA1"; $worksheet->Range("A1")->{'value'} = "01aBcD2"; $cellA1 = $worksheet->Range("A1")->{'Value'}; print "\nCell A1 = $cellA1"; $cellA1 = uc $cellA1; print "\nCell A1 = $cellA1"; # Close It Up $xl_app->ActiveWorkbook->Close(0); $xl_app->Quit();
In reply to OLE, Excel, and PERL by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |