On 2010/12/13 05:23 AM, Andrew Paternoster wrote:
Hi Johan

Do you mind sharing a copy of your COA triggers?



In Perl (rlm_perl) - Where I make my decision to disconnect.
-------------------
if ($balance <= 0)
{ $RAD_REPLY{'Tmp-String-0'} = 'DISCONNECT'; };


In my virtual server
--------------------
accounting {
  perl
  if ("%{reply:Tmp-String-0}" == "DISCONNECT") {
    update disconnect {
      User-Name = "%{User-Name}"
    }
  }
}




--


Johan Meiring
Cape PC Services CC
Tel: (021) 883-8271
Fax: (021) 886-7782

-
List info/subscribe/unsubscribe? See http://www.freeradius.org/list/users.html

Reply via email to