Hi
What am I doing wrong? I am trying to access AGI script. I launch the
agi script and the fixed variables are displayed but I never see any
perl code once I am in the script? Sandy
;Naming your new
List-----------------------------------------------------
exten => 1,2,Background(pls-enter-num-message-after-tone)
exten => 1,3,Record(genericFile:ulaw|3|120)
;exten => box-SUCCESS,3,Background(recorded)
exten => 1,4,Playback(genericFile)
exten => 1,5,NoOp(Exten and NameNum is ${VM_EXTEN} ${NAME_NUM})
;Search for last list for this user
extension-----------------------------
exten => 1,6,AGI(distSearch.agi)
exten => 1,7,NoOp(Exten and NameNum is ${VM_EXTEN} ${NAME_NUM})
;Copy Voice file to distlist and input list
ext.--------------------------
exten => 1,8,TrySystem(‘cp genericFile.ulaw
DISTLISTDIR/${VM_EXTEN}/${NAME_NUM}.ulaw’)
exten => 1,9,TrySystem(‘touch DISTLISTDIR/${VM_EXTEN}/LIST
${NAME_NUM}.txt’)
exten => 1,10,Goto(inputExt,inputLists,1)
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
#!/usr/bin/perl -w
#Voicemail Distribution Program
#Search used with Asterisk AGI to return variables
#S.Tynan 04/27/11
use Asterisk::AGI;
$AGI = new Asterisk::AGI;
%input = $AGI->ReadParse();
#$AGI->say_number(1984);
$string = “test”;
$level = 1;
$AGI->verbose($string, $level);
#exit;
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
– Executing [s@MainExt-lists:6] Playback(“SIP/1002-00000029”,
“afternoon”) in new stack
– <SIP/1002-00000029> Playing ‘afternoon’ (language ‘en’)
– Executing [s@MainExt-lists:7] BackGround(“SIP/1002-00000029”,
“Press1&afternoon”) in new stack
– <SIP/1002-00000029> Playing ‘Press1’ (language ‘en’)
– <SIP/1002-00000029> Playing ‘afternoon’ (language ‘en’)
– Executing [s@MainExt-lists:8] WaitExten(“SIP/1002-00000029”, “5”)
in new stack
== CDR updated on SIP/1002-00000029
– Executing [1@MainExt-lists:1] Read(“SIP/1002-00000029”,
“VM_EXTEN|please-enter-your|4”) in new stack
– Accepting a maximum of 4 digits.
– <SIP/1002-00000029> Playing ‘please-enter-your’ (language ‘en’)
– User entered ‘2222’
– Executing [1@MainExt-lists:2] BackGround(“SIP/1002-00000029”,
“pls-enter-num-message-after-tone”) in new stack
– <SIP/1002-00000029> Playing
’pls-enter-num-message-after-tone’ (language ‘en’)
– Executing [1@MainExt-lists:3] Record(“SIP/1002-00000029”,
“genericFile:ulaw|3|120”) in new stack
– <SIP/1002-00000029> Playing ‘beep’ (language ‘en’)
– Executing [1@MainExt-lists:4] Playback(“SIP/1002-00000029”,
“genericFile”) in new stack
– <SIP/1002-00000029> Playing ‘genericFile’ (language ‘en’)
– Executing [1@MainExt-lists:5] NoOp(“SIP/1002-00000029”, "Exten
and NameNum is 2222 ") in new stack
– Executing [1@MainExt-lists:6] AGI(“SIP/1002-00000029”,
“distSearch.agi”) in new stack
– Launched AGI Script /var/lib/asterisk/agi-bin/distSearch.agi
AGI Tx >> agi_request: distSearch.agi
AGI Tx >> agi_channel: SIP/1002-00000029
AGI Tx >> agi_language: en
AGI Tx >> agi_type: SIP
AGI Tx >> agi_uniqueid: 1309201763.41
AGI Tx >> agi_callerid: 1002
AGI Tx >> agi_calleridname: sammyt2
AGI Tx >> agi_callingpres: 0
AGI Tx >> agi_callingani2: 0
AGI Tx >> agi_callington: 0
AGI Tx >> agi_callingtns: 0
AGI Tx >> agi_dnid: 1001
AGI Tx >> agi_rdnis: unknown
AGI Tx >> agi_context: MainExt-lists
AGI Tx >> agi_extension: 1
AGI Tx >> agi_priority: 6
AGI Tx >> agi_enhanced: 0.0
AGI Tx >> agi_accountcode:
AGI Tx >>
– AGI Script distSearch.agi completed, returning 0
– Executing [1@MainExt-lists:7] NoOp(“SIP/1002-00000029”, "Exten
and NameNum is 2222 ") in new stack
– Executing [1@MainExt-lists:8] TrySystem(“SIP/1002-00000029”, “cp
genericFile.ulaw DISTLISTDIR/2222/.ulaw”) in new stack
– Executing [1@MainExt-lists:9] TrySystem(“SIP/1002-00000029”,
“touch DISTLISTDIR/2222/LIST.txt”) in new stack
– Executing [1@MainExt-lists:10] Goto(“SIP/1002-00000029”,
“inputExt|inputLists|1”) in new stack