|
|
Shadowlands Forum 1.9.6.4 (Stable branch)
07-04-2008
|
|
Authen::Simple::DBI(3pm) User Contributed Perl Documentation Authen::Simple::DBI(3pm) NAME
Authen::Simple::DBI - Simple DBI authentication SYNOPSIS
use Authen::Simple::DBI; my $dbi = Authen::Simple::DBI->new( dsn => 'dbi:SQLite:dbname=database.db', statement => 'SELECT password FROM users WHERE username = ?' ); if ( $dbi->authenticate( $username, $password ) ) { # successfull authentication } # or as a mod_perl Authen handler PerlModule Apache::DBI PerlModule Authen::Simple::Apache PerlModule Authen::Simple::DBI PerlSetVar AuthenSimpleDBI_dsn "dbi:SQLite:dbname=database.db" PerlSetVar AuthenSimpleDBI_statement "SELECT password FROM users WHERE username = ?" <Location /protected> PerlAuthenHandler Authen::Simple::DBI AuthType Basic AuthName "Protected Area" Require valid-user </Location> DESCRIPTION
DBI authentication. METHODS
* new This method takes a hash of parameters. The following options are valid: * dsn Database Source Name. Required. dsn => 'dbi:SQLite:dbname=database.db' dsn => 'dbi:mysql:database=database;host=localhost;' * statement SQL statement. The statement must take a single string argument (username) and return a single value (password). Required. statement => 'SELECT password FROM users WHERE username = ?' * username Database username. username => 'username' * password Database password. password => 'secret' * log Any object that supports "debug", "info", "error" and "warn". log => Log::Log4perl->get_logger('Authen::Simple::DBI') * authenticate( $username, $password ) Returns true on success and false on failure. SEE ALSO
Authen::Simple. Authen::Simple::Password. DBI. AUTHOR
Christian Hansen "ch@ngmedia.com" COPYRIGHT
This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself. perl v5.8.8 2008-02-29 Authen::Simple::DBI(3pm)