NAME Data::ACL - Perl extension for simple ACL lists SYNOPSIS use Data::ACL; use Set::NestedGroups; # See Set::NestedGroups documentation my $groups = Set::NestedGroups->new; $groups->add( 'root', 'wheel' ); $groups->add( 'wheel', 'staff' ); $groups->add( 'webmaster', 'staff' ); my $acl = Data::ACL->new( $groups ); my $web = $acl->Realm( 'web' ); $web->Deny( 'all' ); $web->Allow( 'staff' ); &DenyAccess unless $acl->IsAuthorized( $user, 'web' ); DESCRIPTION This module implements a series of allowed and denied access control lists for permissive controls. The Set::NestedGroups module is used to define users and nested permissive groups. METHODS The following methods are available through this module for use in the creation and manipulation of access control lists. No methods of this module may be exported into the calling namespace. new my $acl = Data::ACL->new( $groups ); The method creates a new access control list module and requires the Set::NestedGroups object of defined users and nested permissive groups to be passed to this object constructor. Realm my $realm = $acl->Realm( $name ); This method creates a new authentication realm to which users and groups can be assigned access rights via the Allow and Deny methods. Allow $realm->Allow( $group ); This method grants access rights to the user or group passed as an argument to this method within the authentication realm object defined previously by the $acl->Realm method. Deny $realm->Deny( $group ); This method denies access rights to the user or group passed as an argument to this method within the authentication realm object defined previously by the $acl->Realm method. IsAuthorized if ( $acl->IsAuthorized( $user, $name ) ) { ... } This method is used to test the access rights of a user or group to the authentication realm defined by $name. SEE ALSO Set::NestedGroups VERSION 0.02 AUTHOR Ariel Brosh, schop@cpan.org (Inactive); Rob Casey, robau@cpan.org