$UserName=Win32::AdminMisc::GetLoginName();