G o o d b y e   c r u e l   w o r l d

##</code><code>##

use Win32::OLE;
$obj = Win32::OLE->new("Logger") or die;
$obj->Output("Goodbye cruel world");

##</code><code>##

Dim obj
Set obj = CreateObject("Logger")
obj.Output("Goodbye cruel world")