
Authen::Simple - Simple Authentication

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
}

Simple and consistent framework for authentication.

This method takes an array of Authen::Simple adapters. Required.
Returns true on success and false on failure.

Authen::Simple::ActiveDirectory.

Christian Hansen ch@ngmedia.com

This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.