NAME ACL::Lite - Liteweight and flexible ACL checks VERSION Version 0.0004 SYNOPSIS use ACL::Lite; $acl = ACL::Lite->new(permissions => 'foo,bar'); $acl->check('foo'); if ($ret = $acl->check([qw/baz bar/])) { print "Check successful with permission $ret\n"; } unless ($acl->check('baz')) { print "Permission denied\n"; } $acl = ACL::Lite->new(uid => 666); $acl->check('authenticated'); DESCRIPTION `ACL::Lite' is a simple permission checker without any prerequisites. `ACL' stands for "Access Control Lists". DEFAULT PERMISSION The default permission depends on whether you pass a `uid' (authenticated) or not (anonymous). CONSTRUCTOR new Creates an ACL::Lite object by passing the following parameters: uid User identifier for authenticated users. permissions Granted permissions. separator Separator used to parse permission strings. Defaults to `,'. check $permissions, $uid Checks whether any of the permissions in $permissions is granted. Returns first permission which grants access. permissions Returns permissions as hash reference: $perms = $acl->permissions; Returns permissions as list: @perms = $acl->permissions; CAVEATS Please anticipate API changes in this early state of development. AUTHOR Stefan Hornburg (Racke), `racke@linuxia.de' BUGS Please report any bugs or feature requests to `bug-acl-lite at rt.cpan.org', or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=ACL-Lite. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes. SUPPORT You can find documentation for this module with the perldoc command. perldoc ACL::Lite You can also look for information at: * RT: CPAN's request tracker (report bugs here) http://rt.cpan.org/NoAuth/Bugs.html?Dist=ACL-Lite * AnnoCPAN: Annotated CPAN documentation http://annocpan.org/dist/ACL-Lite * CPAN Ratings http://cpanratings.perl.org/d/ACL-Lite * Search CPAN http://search.cpan.org/dist/ACL-Lite/ ACKNOWLEDGEMENTS LICENSE AND COPYRIGHT Copyright 2011-2013 Stefan Hornburg (Racke). This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License. See http://dev.perl.org/licenses/ for more information.