Schema::RDBMS::AUS::User

Manipulate users and groups in the AUS schema.
Download

Schema::RDBMS::AUS::User Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Tyler MacDonald
  • Publisher web site:
  • http://search.cpan.org/~crakrjack/

Schema::RDBMS::AUS::User Tags


Schema::RDBMS::AUS::User Description

Manipulate users and groups in the AUS schema. Schema::RDBMS::AUS::User is a Perl module that allows you to manipulate users and groups in the AUS schema.SYNOPSIS use Schema::RDBMS::AUS::User; use DBIx::Transaction; my $dbh = DBIx::Transaction->connect('DBI:Pg:'); if(my $user = Schema::RDBMS::AUS::User->login('user', 'pass', _dbh => $dbh)) { print "user id is $user->{id} "; $user->clear_flag("never_logged_in"); } $user->change_password($old, $new); my $group = Schema::RDBMS::AUS::User->create(name => "Resellers", is_group => 1); $user->add_to_group($group); $user->save; $group->set_flag("back_room", 1, 1); $group->save; $user->refresh; if($user->permission('back_room')) { print "User $user->{name} is allowed in the back room. "; } etc...A Schema::RDBMS::AUS::User object represents a User or a Group in the Authentication, Users and Sessions (AUS) schema. Most of the rest of the schema is managed via a user. Requirements: · Perl


Schema::RDBMS::AUS::User Related Software