Displaying 1 result from an estimated 1 matches for "conference_call".
2010 Jan 11
1
MeetMe Conferencing - Announce your own join/leave to yourself and other conference members
...rict;
use warnings;
use lib '/var/lib/asterisk/agi-bin';
use DBI;
use Asterisk::AGI;
our ($AGI,%v,%ast);
$AGI = new Asterisk::AGI;
%ast = $AGI->ReadParse();
$v{chan} = $ast{channel};
$v{lang} = $AGI->get_variable('CHANNEL(language)');
$v{conf} = $AGI->get_variable('conference_call');
$v{dbh} = <sanitized>
($v{q},$v{r}) = undef;
$v{q} = "SELECT members FROM <sanitized> WHERE confno = '".$v{conf}."'";
$AGI->verbose($v{q});
$v{q} = $v{dbh}->prepare($v{q});
if (!$v{q}->execute) {
exit;
}
$v{r} = $v{q}->fetchrow_hashref()...