Authen::Simple3pm

Usage

    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
    }

Overview

Simple and consistent framework for authentication.

Methods

•

new

This method takes an array of "Authen::Simple" adapters. Required.

•

authenticate( $username, $password )

Returns true on success and false on failure.