use Win32::OLE; my $LogObj = Win32::OLE->new('LOGGERHELPER.UILogHelp'); print "REF IS: ", ref $LogObj, "\n"; print Win32::OLE->LastError(), "\n" unless ( $LogObj);