All attributes in rlm_perl scripts should be text. rlm_perl convert them to text before function call and convert them from text after function return. So you should use

$RAD_REPLY{'DHCP-Classless-Static-Route'} = '0x'.unpack('H*', $route);

On 28.02.2013 11:05, Бен Томпсон wrote:
Hello everyone

I am having a slight problem with rlm_perl and I would really
appreciate any advice/help.

I have a perl script which rlm_perl adds a value to the
DHCP-Classless-Static-Route attribute something like this :-

#### perl script snippets ############
...
my $route = pack('C7', split(/\,/, "16,172,16,10,0,0,2"));
...
&radiusd::radlog(RADLOG_DEBUG, "packed data: " . unpack('H*', $route));
...
$RAD_REPLY{'DHCP-Classless-Static-Route'} = $route;
...
###############################
-
List info/subscribe/unsubscribe? See http://www.freeradius.org/list/users.html

Reply via email to