Authen::Simple::RADIUS 0.1

Authen::Simple::RADIUS is a simple RADIUS authentication in Perl.

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 >

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.

Product's homepage

Requirements:

· Perl