>Здравствуйте.
>На ОC FreeBSD 6.2 запущен asterisk-1.4.21.1. Необходимо сделать аутентификацию sip клиентов через
>Radius. Настроил, как написано на сайте http://www.voip-info.org/wiki/index.php?page_id=1780. Но из скрипта на
>Radius не приходит пароль клиента.
>Не пойму как в agi-perl скрипт вытащить значение secret клиента из файла
>sip.conf?
>спасибо http://www.voip-info.org/wiki/view/Asterisk%3A%3Ac...
#!/usr/bin/perl
use Asterisk::config;
my $sip_conf = new Asterisk::config(file=>'/etc/sip.conf');
$allow = $sip_conf->fetch_values_arrayref(section=>'general',key=>'allow');
print $allow->[0];
Думаю принцип понятен.