Select Code to Download

Public Function myfn(arg As Double) As Double
    myfn = arg + Rnd()
End Function

#!perl

...
    || Win32::OLE->new('Excel.Application', 'Quit');

print "output = ", $Excel->Run('myfn', 17), "\n";

output = 17.468005657196