Я использую Win32::OLE::Const->Load()
в perl:
$xl = Win32::OLE::Const->Load('Microsoft Excel');
, затем я проверяю, равен ли scalar(keys %{$xl})
ноль:
if (scalar(keys %{$xl})==0) {
return False;
}
else {
return True;
}
Я проверял этот код на машине, которая поддерживает Microsoft Excel 2003, он дает True
, но когда я тестировал тот же код на машине, где есть Microsoft Excel 2013, он дает мне False
!
Я также напечатал scalar(keys %{$xl}
на первой машине это дает 2023, во второй машине это 0!
С наилучшими пожеланиями