Si si , ca peut avoir un interet pour separer justement l'aspect dialplan de la partie "metier". Je vais publier un script bientot ( des que j'ai un peu de temps pour faire un tuto ) qui montrera comment j'utilise cela.

Pour repondre à la question initiale en Perl, moi j'utilise Asterisk::AGI
On peut alors ecrire quelque chose comme cela:

Code:
use Asterisk::AGI;
my $AGI = new Asterisk::AGI;
$AGI->noop("Debut agi");
$AGI->set_variable("VARIABLE",$variable);
On pourra l'utiliser ensuite dans le dialplan comme cela:
( ici avec passage d'une variable en entree )

Code:
exten => s,1,AGI(testAGI,${CALLERID(num)})
exten => s,n,Noop(La variable VARIABLE a été setté à  ${VARIABLE} dans l'agi)
Ca devrait te permettre d'aller plus loin.
Fastm3.