Help for this page

Select Code to Download


  1. or download this
    $perms->Add("$account",
            "$folder_ace_var" || "$subfolder_ace_var",
            "ACCESS_ALLOWED_ACE_TYPE",
            "CONTAINER_INHERIT_ACE" || "OBJECT_INHERIT_ACE");
  2. or download this
    if ( $folder_ace_var )
{
...
               "ACCESS_ALLOWED_ACE_TYPE",
               "CONTAINER_INHERIT_ACE"); 
}
  3. or download this
    $perms->Add("$account",
            "$folder_ace_var | $subfolder_ace_var",
            "ACCESS_ALLOWED_ACE_TYPE",
            "CONTAINER_INHERIT_ACE | OBJECT_INHERIT_ACE");
  4. or download this
    #!/opt/local/bin/perl -w
use strict;
...
#
# end of code
#