65 Davidson Rd.
Piscataway, NJ 08854
Phone: (732) 445-6266
Fax: (732) 445-5493
Email: [EMAIL PROTECTED]
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Dave Roth
Sent: Friday, March 11, 2005 2:35 AM
To: Chris Wagner; perl-win32-admin@listserv.ActiveState.com
Subject: RE: Win32::PermsYou are right that WMI is a good alternative to Win32::Perms (and since my team has no resources to work on this module it is a good idea to make use of WMI).
From: [EMAIL PROTECTED] on behalf of Chris Wagner
Sent: Thu 3/10/2005 9:35 AM
To: perl-win32-admin@listserv.ActiveState.com
Subject: Win32::PermsSince I see that his Excellency Dave Roth reads this mailing list I'll throw
this out there for him or anybody who knows. I'm using Win32::Perms with
great effect on a network audit. However some of them are failing that
"shouldn't". I use Lanman to get the share list on a host then use Perms to
get the permissions on each shared directory (not the share point).
Creating the perms object usually succeeds unless it's blocked by an Access
Denied. unless ( $cperm = new Win32::Perms($unc) ) {.....} $unc is like
\\123.0.0.1\bob\ The problem comes when I call Dump on it, $cperm->Dump(
[EMAIL PROTECTED] ). Sometimes this will fail which means either there are no
permissions at all or we don't have permission to get the permissions. Now
if I take one of these failures are go to the UNC in Windows Explorer, I
*can* see the permissions, with the same logon as the script, except that
explorer admonishes "You only have permission to view ...". Then when I
drill into the permissions it shows that Everyone has the "Read Permissions"
flag. So why does Win32::Perms die on this when Explorer works? My guess
is that Perms is trying to open the object as read/write when we only have
"read". Dave?
As an aside, is there another way to grab the permissions? I'm thinking WMI
or OLE.
--
REMEMBER THE WORLD TRADE CENTER ---=< WTC 911 >=--
"...ne cede males"
00000100
_______________________________________________
Perl-Win32-Admin mailing list
Perl-Win32-Admin@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
_______________________________________________ Perl-Win32-Admin mailing list Perl-Win32-Admin@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs