如何从Excel调用Perl脚本？

ppm install Win32-OLE

#!/usr/bin/perl
use strict;
use warnings;

my ($num1, $num2) = @ARGV;
my $sum = $num1 + $num2;
print $sum;

Sub CallPerlScript()
    Dim objShell As Object
    Dim objFSO As Object
    Dim objFile As Object
    Dim strPath As String
    Dim strCommand As String
    Dim strOutput As String
    
    ' 设置Perl脚本的路径和参数
    strPath = "C:\path\to\perl\script.pl"
    strCommand = "perl " & strPath & " 10 20"
    
    ' 创建Shell对象并执行命令
    Set objShell = CreateObject("WScript.Shell")
    strOutput = objShell.Exec(strCommand).StdOut.ReadAll
    
    ' 输出结果
    MsgBox strOutput
End Sub