use Win32;
print Win32::GetFolderPath(CSIDL_SYSTEM);