Perl AGIスクリプトでユーザーが入力した内線番号を取得するにはどうすればよいですか？

Question

私はAsterisk AGIプログラミングの新人です。

use Asterisk::AGI; 

$AGI = new Asterisk::AGI; 

for($i = 0 ; $i < 2 ; $i++) 
{ 
    $AGI->exec('Playback','welcome'); 

    $AGI->exec('WaitExten','5|m'); 


} 

は今、私は、ユーザーが入力した拡張子を知っていて、取りたい：イムは、ここにこれまでのところ、私のコードは、ユーザーが1〜4の任意の拡張子を入力することができますasterisk-perlを使用して、簡単なIVRを作成しようそれに応じていくつかのアクション。ユーザーが入力した内線番号を取得するにはどうすればよいですか？

ありがとうございます。

Answer 1

よく、WaitExtenコマンドはユーザーを新しい拡張に変更するので、WaitExtenを呼び出した後に特別な変数${EXTEN}を読むことができると思います。私はAsterisk :: Perlに慣れていませんが、私はJavaからのFastAGIしか使用していないので、正確なコマンドはわかりませんが、変数の値を読み取るコマンドが必要です。

Answer 2

私は、数字などの与えられた数の指定された時間待機し、その後、ファイルを再生することができ、あなたはget_dataを使用したいと考えていると：

$ AGI-> get_data（「デモ-歓迎」を、 15000、5）。

here