The array resulting from the Dump method is an array of hash references, so
you have to do a bit of dereferencing to get the data stored inside. Here's
a code snippet I wrote that should do what you need:
my $acl;
my %hash;
my $name;
my $mask;
foreach $acl ( @List )
{
%hash = %{$Acct};
while( ($name, $mask) = each %hash ) {
print "$name:\t$mask\n";
}
It's pretty self explanatory. I use the %hash assignment to show how to
deference the hash ref, but I think you could also do it in the "each"
statement if you wanted. Hope this helps.
-Mike
-----Original Message-----
From: Cruickshanks, Darin [mailto:[EMAIL PROTECTED]]
Sent: Monday, March 12, 2001 11:36 AM
To: '[EMAIL PROTECTED]'
Subject: Win32::Perms
Hi all,
Does anyone know how to retrieve a list of account names from a share using
Win32::Perms??
I can get the MASK, TYPE and FLAG using $ShareObject->Dump( \@List ); but
the resulting array doesn't appear to store the account names.
Any ideas anyone??
Cheers,
Darin
Darin Cruickshanks, Labs Co-Ordinator
Systems Programmer, Computing Service
University of Essex
E-Mail - [EMAIL PROTECTED]
Phone - 01206 873585
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
