Alguien sabe si para usar Win32::OLE hay que tener instalado algo en el servidor¿?
el siguiente ejemplo no logra hacer nada;:
Código HTML:
use Win32::OLE;
$excel = Win32::OLE->new( 'Excel.Application' ) or die "No se puede arrancar Excel\n";
#$excel = CreateObject OLE "Excel.Application" or die "No se puede arrancar Excel\n";
$excel->{'Visible'} = 1;
$newBook = $excel->Workbooks->Add();
$newBook->{Title} = "Ventas 2001";
$newBook->{Subject} = "Ventas";
$newBook ->Worksheets(1)->Range('A1')->{Value} = '1';
$newBook ->Worksheets(1)->Range('B1')->{Value} = '2';
$newBook ->Worksheets(1)->Range('C1')->{Formula} = '=A1+B1';
print $newBook ->Worksheets(1)->Range('C1')->{Value};
$newBook->SaveAs({Filename =>"c:Ventas2001.xls"});
$excel->Quit();