Win32::OLE->WithEvents($myObj,\&captureEvent, $EventInterfaceName ) [download]
In reply to Re: Win32::OLE Events by Anonymous Monk in thread Win32::OLE Events by mperlsyd