Hi, > > use Authen::Radius; > > my $username = shift; > my $password = shift; > > my $r = new Authen::Radius(Host => 'myserver', Secret => 'mysecret'); > my $result = $r->check_pwd($username, $password); > > exit ($result == 1) ? 0 : 1; > > I thought this should pass all the relevant radius parametres to the module. > Do I need to add the radius server and secret anywhere else in the perl > module? (never used perl module before).
what do the logs from the RADIUS server say and show? WHY is it failing? this is only one half of the equation alan - List info/subscribe/unsubscribe? See http://www.freeradius.org/list/users.html
