NAME
    Authen::Simple::RADIUS - Simple RADIUS authentication

SYNOPSIS
        use Authen::Simple::RADIUS;
    
        my $radius = Authen::Simple::RADIUS->new(
            host   => 'radius.company.com',
            secret => 'secret'
        );
    
        if ( $radius->authenticate( $username, $password ) ) {
            # successfull authentication
        }
    
        # or as a mod_perl Authen handler
    
        PerlModule Authen::Simple::Apache
        PerlModule Authen::Simple::RADIUS

        PerlSetVar AuthenSimpleRADIUS_host "radius.company.com"
        PerlSetVar AuthenSimpleRADIUS_pdc  "secret"

        <Location /protected>
          PerlAuthenHandler Authen::Simple::RADIUS
          AuthType          Basic
          AuthName          "Protected Area"
          Require           valid-user
        </Location>    

DESCRIPTION
    RADIUS authentication.

METHODS
    * new
        This method takes a hash of parameters. The following options are
        valid:

        * host  Connection host, can be a hostname or IP address. Defaults
                to "localhost".

                    host => 'ldap.company.com'
                    host => '10.0.0.1'

        * port  Connection port, default to 1812.

                    port => 1645

        * timeout
                Connection timeout, defaults to 10.

                    timeout => 20

        * secret
                Shared secret. Required.

                    secret => 'mysecret'

        * log   Any object that supports "debug", "info", "error" and
                "warn".

                    log => Log::Log4perl->get_logger('Authen::Simple::RADIUS')

    * authenticate( $username, $password )
        Returns true on success and false on failure.

SEE ALSO
    Authen::Simple.

    Authen::Radius.

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.

