[asterisk-users] Perl-AGI process

[Trevor Peirce]

Abdul wrote:
> i have created one prepaid PERL AGI script to integrate asterisk users 
> in our current Oracle Billing System. I am using $AGI->exec('Dial', 
> $dialstr); in script after getting the MAX time out for the priticular 
> call.
> ...
> My question is, Is there anyway to kill the routing.pl once 
> $AGI->exec('Dial', $dialstr); will run and the call should be continue?
>
No, the AGI won't exit until that command has completed and the AGI 
terminates on it's own.  What I have done in the past is instead of 
Dial, I use SetVar to set the timeout (and any other dial options) into 
a variable.  Then in my asterisk dial plan I call the Dial command with 
that variable.

Or putting it another way in pseudo code:

Dialplan:
s,n,AGI(routecall.agi)
s,n,Dial(${routecall-destination},${routecall-args})

routecall.agi script:
SetVar(routecall-destination) = SIP/blah
SetVar(routecall-args) = L(60000:10000)

Best regards,
Trevor Peirce

-- 
Real CNAM data for incoming Caller ID @ www.cnam.info