http://qs321.pair.com?node_id=588284

MaxKlokan has asked for the wisdom of the Perl Monks concerning the following question:

Hello fellow monks,

I need to dump the ACLs for Windows directories in the form of DACL bitmasks.

If I do it with Win32::FileSecurity it is very fast and all works well with one exception: the "deny" type of permissions are not dumped. If a user has only "deny" permissions, DACL bitmask is not even seen. If it has both "allow" and "deny" permissions the bitmask is the same as if it had only "allow" kind of permissions.

I have then tried with Win32::OLE. It works well but, besides requiring more complex code, it is extremely slow as compared to Win32::FileSecurity.

Is there a way to have the cake and eat it too (i.e. get full DACL info and fast), possibly without having to install extra modules (using ActiveState 5.8.8)?

Thanks for your suggestions...