Set::NestedGroup::Member - Set of nested groups
use Set::NestedGroup;
$acl = new Set::NestedGroup;
$acl->add('user','group');
$acl->add('group','parentgroup');
$list=$acl->list();
for(my $i=0;$i<$list->rows();$i++){
my ($member,$group)=$list->next();
print "$member=$group\n";
}
Set::NestedGroup::Member objects are returns from a Set::NestedGroup object's
list() method.
- rows ()
- Returns the number of rows this has. May be used to construct a loop to
extract all the data.
- next ()
- Returns a list comprising of the next member & group. Returns undef
when the list is exhausted.
Alan R. Barclay, gorilla@elaine.drink.com
perl(1), Set::NestedGroup
Hey! The above document had some coding errors, which are explained
below:
- Around line 73:
- '=item' outside of any '=over'
- Around line 83:
- You forgot a '=back' before '=head1'