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

the Authen::Simple manpage.

the Authen::Radius manpage.

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.