1Catalyst::Action::Role:U:sAeCrL(C3o)ntributed Perl DocumCeanttaaltyisotn::Action::Role::ACL(3)
2
3
4
6 Catalyst::Action::Role::ACL - Deprecated user role-based authorization
7 action class
8
10 sub foo
11 :Local
12 :ActionClass(Role::ACL)
13 :RequiresRole(admin)
14 :ACLDetachTo(denied)
15 {
16 my ($self, $c) = @_;
17 ...
18 }
19
20 sub denied :Private {
21 my ($self, $c) = @_;
22
23 $c->res->status('403');
24 $c->res->body('Denied!');
25 }
26
28 Provides a Catalyst reusable action for user role-based authorization.
29 ACLs are applied via the assignment of attributes to application action
30 subroutines.
31
32 You are better using Catalyst::ActionRole::ACL to do this, as it plays
33 nicely with other extensions. This package is maintained to allow
34 compatibility with people using this in existing code, but will warn
35 once when used.
36
38 David P.C. Wollmann <converter42@gmail.com>
39
41 This is new code. Find the bugs and report them, please.
42
44 Copyright 2009 by David P.C. Wollmann
45
46 This program is free software; you can redistribute it and/or modify it
47 under the same terms as Perl itself.
48
49
50
51perl v5.32.1 2021-01-26 Catalyst::Action::Role::ACL(3)