Object helper for Object::Permission using unix groups.
use Object::Permission::Group; # $*AUTH-USER is derived from $*USER # Or: Use Object::Permission::Group; # Set $*AUTH-USER to one for a specified user $*AUTH-USER = Object::Permission::Group.new(user => 'wibble');
This provides a simple implementation of
be used with Object::Permission which derives the permissions for the
$*AUTH-USER from the
users unix group membership.
$*AUTH-USER is initialised based on the value of
(i.e. the effective user,) but it can be set manually with the permissions
of an arbitrary user (as in the second example above.)
Assuming you have a working Rakudo Perl 6 installation you should be able to install this with panda :
# From the source directory panda install . # Remote installation panda install Object::Permission::Group
There is no reason to believe this shouldn't work with zef as well.
Suggestions/patches are welcomed via github at:
This is free software.
Please see the LICENCE file in the distribution
© Jonathan Stowe 2015, 2016, 2017