in reply to Win32::OLE(0.1702) error 0x80020011
under $ex;
rather than:
undef $ex;
Corrected the code and am no longer getting the error, so I think that was the problem.