Hi,

I am a evaluating Dave's Win32::Perms module and have a few questions. 
I'm using some of the example code in his book (Win32 Perl Programming, 2nd Ed.)
and can't seem to get anything to work. 

I need to add write permissions to an ini file in the 'C:\winnt' directory 
for all domain authenticated users on multiple Win2000 workstations. This file 
currently has full access only for local administrator.  When I run the code for 
example 11.9, passing the path to the file 'c:/winnt/tester.ini', I get no owner, 
no group and 'everyone has full control' as output.  This is not correct. 

I've also run some example code from his web site 'Win32::Perm Home page' and 
see no change in the file permission from Windows:

#--------------------------
use Win32::Perms;
   # Create an empty SD
$File = new Win32::Perms;      
    # One of two ways to add an ACE
$tmp= $File->Allow('student', MODIFY);
    # The second way to add an ACE
#$tmp= $File->Add( {Account=>'Users', Mask=>FULL } );  

$tmp= $File->Set('c:/winnt/smw.ini');                              
#-----------------------------------

The actions appear to be working based on their return values 
but when I query the file security properties in windows there 
is no change and the Dump always shows:

Descretionary ACL:
Index Account                                  Mask       Type       Flag
----- ---------------------------------------- ---------- ---------- ----------
    0 SLKCLAB3\student                         0x00000000 Allow      0x00000002


System (auditing) ACL:
Index Account                                  Mask       Type       Flag
----- ---------------------------------------- ---------- ---------- ----------
This is a NULL SACL. This means that no auditing is taking place.


HELP!!
What am I doing wrong.

Thanks in advance
Al Lewis



_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to