The ActiveState ActivePerl 5.8 below runs from the command line but not when called via cgi. Any help would really be appreciated!
#!C:/Perl/bin/perl.exe
#
use strict;
use Win32::OLE qw(in with);
use Win32::OLE::Const 'Microsoft Excel';
$Win32::OLE::Warn = 3; # die on errors...
my $Excel = Win32::OLE->GetActiveObject('Excel.Application') || Win32::OLE->new('Excel.Application', 'Quit'); # get already ve Excel application or open new
my $Book = $Excel->Workbooks->Open("C:\\Program Files\\Apache Group\\Apache2\\cgi-bin\\Reception.xls"); # open Excel file
$Excel->Run("collectfiles");
$Book->Close;
$Excel->quit();
Apache2 server error log:
[Fri Jul 22 11:16:11 2005] [error] [client 207.177.227.2] Premature end of script headers: receivefiles.pl, referer: http://www.ccamp.org/test.htm
[Fri Jul 22 11:16:11 2005] [error] [client 207.177.227.2] Win32::OLE(0.1702) error 0x80080005: "Server execution failed" at C:/Program Files/Apache Group/Apache2/cgi-bin/receivefiles.pl line 7\r, referer: http://www.ccamp.org/test.htm
[Fri Jul 22 11:16:11 2005] [error] [client 207.177.227.2] \teval {...} called at C:/Program Files/Apache Group/Apache2/cgi-bin/receivefiles.pl line 7\r, referer: http://www.ccamp.org/test.htm
Calling page (test.htm) source:
Water Quality Data Navigator