$IE = Win32::OLE->GetActiveObject('InternetExplorer.Application');