Пользователю, совершающему вызов, предлагается набрать добавочный номер. Это делается путем 1#воспроизведения подсказки с фоном, а затем 2#wait_for_digit. На основе набранного добавочного номера определяется номер назначения, и вызов переадресовывается на этот номер.
Если вызываемый абонент не отвечает, то используется Воспроизведение для воспроизведения подсказки, в которой пользователю предлагается записать голосовое сообщение; запись голосового сообщения осуществляется с помощью приложения Запись.
Это приложение Record всегда создает пустые wav-файлы размером 44 байта. Если я уберу 1#воспроизведение подсказки с помощью Фонового, приложение Запись создаст правильные файлы. Если включен Фон, все записи пусты.
Я использую модуль Perl Asterisk::AGI.
$agi->exec('Answer');
....
.....
$agi->exec('Background', 'en/extra/please-enter-the-extension,n'); # this is the troubling part
my $my_extension = $agi->wait_for_digit(5000);
....
.....
$agi->exec('Playback', 'en/extra/the-party-you-are-calling&en/extra/is-curntly-busy,noanswer');
$agi->exec('Playback', 'en/vm-intro,noanswer');
my $file = 'xyz.wav';
$agi->exec('Record', "$file,0,10,k");
...
...
Что я должен сделать, чтобы заставить его работать так, как я хочу?
Спасибо.
ОБНОВЛЕНИЕ 1: Тот же скрипт теперь работает без глюков. Не уверен, изменилось ли что-то, не связанное со сценарием.
