Radius サーバに接続するためには、そのホスト名と シークレット が必要である。シークレットは Radius サーバへのパスワードみたいなもの。以下のコードでは $r に Radius クライアントのオブジェクトが入り、その後で $USENAME と $PASSWORD を使って $HOST にアクセスしている。 使用するモジュール use Authen::Radius; #!/usr/bin/perl use Authen::Radius; our $HOST = '1.1.1.1'; our $USERNAME = 'perltips'; our $PASSWORD = 'password'; our $SECRET = 'testing123'; # First Trial $r = new Authen::Radius(Host => $HOST, Secret