use Win32::OLE;
$wmiFileSecSetting = Win32::OLE->GetObject("winmgmts:Win32_LogicalFileSecuritySetting.path='d:\\programming'");
$RetVal = $wmiFileSecSetting->GetSecurityDescriptor($wmiSecurityDescriptor);