NAME
Authen::Simple - Simple Authentication
SYNOPSIS
use Authen::Simple;
use Authen::Simple::Kerberos;
use Authen::Simple::SMB;
my $simple = Authen::Simple->new(
Authen::Simple::Kerberos->new( realm => 'REALM.COMPANY.COM' ),
Authen::Simple::SMB->new( domain => 'DOMAIN', pdc => 'PDC' )
);
if ( $simple->authenticate( $username, $password ) ) {
# successfull authentication
}
DESCRIPTION
METHODS
new
This method takes an array of
Authen::Simple
adapters. Required.authenticate( $username, $password )
Returns true on success and false on failure.
SEE ALSO
Authen::Simple::ActiveDirectory.
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.