Win32::OLE->WithEvents($myObj,\&captureEvent, $EventInterfaceName )