Hi
i am trying to write a perl AGI script that reads the calleried and password and cross check it with database .
i have problem getting the callerid from AGI->readparse() function
any help would be appreciated!!
and here is snippet of my code where i tried to see what the asterisk sends to AGI,
but the outputfile is not at all generated :(
#!/usr/bin/perl
use Asterisk::AGI;
$AGI = new Asterisk::AGI;
my %input = $AGI->ReadParse();
my $callerid = $input{'callerid'};
open(OUTFILE,">>/var/spool/asterisk/agilog");
while ( my ($key, $value) = each(%input) ) {
print OUTFILE "$key => $value\n";
thanks
CG
