Maybe try it like this
if ( $lefttime le 0 ) {
$RAD_REPLY{'Reply-Message'} =
"Your account has expired";
return RLM_MODULE_REJECT;
}else {
$RAD_REPLY{'Session-Timeout'} =
"$lefttime";
return RLM_MODULE_OK;
On Tue, Feb 22, 2011 at 6:55 AM, christ...@wanxp.com <christ...@wanxp.com>wrote:
> Dear,
>
> i am just planning to upgrade Freeradius to v2 , but i got my perl didnt
> send any atrribute , it worked fine in v1, is there any idea what wrong with
> my script in freeradius2 ?
>
> #!/usr/bin/perl
> #
>
> if ($lefttime <= 0)
> {
> print "Reply-Message=\"Your account has expired\"";
> exit 1;
> }
> else
> {
> print "Session-Timeout=" . $lefttime . ", ";
> }
>
> -
> List info/subscribe/unsubscribe? See
> http://www.freeradius.org/list/users.html
>
-
List info/subscribe/unsubscribe? See http://www.freeradius.org/list/users.html
