On Sep 27, Chris Devers ([EMAIL PROTECTED]) typed: Chris: On Mon, 27 Sep 2004, S.A. Birl wrote: Chris: Chris: > I could use backticks `` to call cacls.exe inside of Perl But there's Chris: > a problem using cacls.exe, I cannot wipe out all permissions on a Chris: > given directory. I need to know the user/group. Chris: > Chris: > Is there another .exe? If so, email off-line as this goes outside of Chris: > Perl and I dont want to fill up the PERL list with non-Perl stuff. Chris: Chris: Actually, it would be interesting to keep this on list, as long as it Chris: doesn't go *too* far astray. This is a problem that a lot of Windows Chris: users may want to address sooner or later, and if Perl can't do it then Chris: there might as well be a note in the archives saying what did work. Chris: Chris: I always thought it was weird that the chmod() / chown() etc functions Chris: didn't get rigged to Do The Right Thing on Windows. Really, you Chris: shouldn't have to learn a new permissions API when Perl already has a Chris: perfectly good one that works for *nix (Linux, Solaris, OSX, etc) and Chris: seems like it would correlate tolerably well onto Windows systems. Chris: Chris: Heck, if Cygwin can weld it on there, why not Perl? :-)
Im not having much success with Cygwin either. In fact I tried those commands first. The overall problem is this: I have PERL calling owsadm.exe to setup websites. Each website then has a folder called AppDev created: testweb\AppDev I want to wipe out the default permissions on AppDev. The defaults are: OWS_abcdefghij_advauthor RWX group OWS_abcdefghij_admin RWXP group Administrators Full Control group SYSTEM Full Control user IUSR_computer RX user (Where OWS_abcdefghij is a random-digit hash that M$ SharePoint, owsadm.exe, creates) Now I can wipe out the IUSR_computer account from the permissions. But it's the OWS_abcdefghij groups that are a headache. I was hoping that it would be easier to drop all the permissions and then re-add Administrators and SYSTEM in PERL. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
