Select Code to Download

Select or download this

my ($m_obj_dir) = new Win32::Perms($m_unc_path) 
        or die "Cannot create Win32::Perms obj for $m_unc_path - $!\n"
+;    
    $m_obj_dir->Dump;

Select or download this

Descretionary ACL:
Index Account                                  Mask       Type       F
+lag
...
    5                                          0x001301bf Allow      0
+x00000003
    6                                          0x001200a9 Allow      0
+x00000003
<snip>