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";