Perl OLE文档可见

Question

我尝试使用Perl脚本打开和修改Excel文档，我希望此文档在之后仍然打开。我使用以下代码：

unless (defined $ex) {
$ex = Win32::OLE->new('Excel.Application', sub{$_[0]->Quit;})
or die "Cannot start Excel";
}

$ex->{Visible} = 1;

Excel文档会短暂出现，然后消失。工作正确完成，但Excel关闭后。有没有办法让Excel保持开放状态？

Answer 1

只需从新方法中删除析构函数结构：

$ex = Win32::OLE->new('Excel.Application')
or die "Cannot start Excel";