Posts Tagged Asterisk

PrePaid CallingCard IVR Sample Application


#!/usr/bin/perl
#
# PrePaid CallingCard IVR <a id="_GPLITA_0" title="Powered by Text-Enhance" href="http://shishir.com.np/blog/?q=node/11#">Application</a> for Asterisk PBX
use Asterisk::AGI;
use DBI;

# Config options
%MYSQL = (
hostname =&gt; "localhost",
username =&gt; "username",
password =&gt; "password",
database =&gt; "asteriskdb"
);

$dbh = DBI-&gt;connect("dbi:mysql:$MYSQL{database}:$MYSQL{hostname}","$MYSQL{username}","$MYSQL{password}")
Read more

, , , , , , ,

No Comments

Perl CPAN and Asterisk


asterisk::AGI - Simple Asterisk Gateway Interface Class

SYNOPSIS ^

use Asterisk::AGI;

$AGI = new Asterisk::AGI;

# pull AGI variables into %input

%input = $AGI-&gt;ReadParse();

# say the number 1984

$AGI-&gt;say_number(1984);

DESCRIPTION ^

This module should make it easier to 
Read more

, , , ,

No Comments

DUNDi, In easy steps

DUNDi™ is a peer-to-peer system for locating Internet gateways to telephony services.

Unlike traditional centralized services (such as the remarkably simple and oncise
ENUM standard), DUNDi is fully-distributed with no centralized authority whatsoever.

Simply put, DUNDi is an Asterisk … Read more

, , ,

No Comments

AGI – IVR – Time Clock


AGI Script

#!/usr/bin/perl

use Asterisk::AGI;
use DBI;

$AGI = new Asterisk::AGI;

my %input = $AGI-&gt;ReadParse();
my $callerid = $input{''''callerid''''};

############# Time Clock Questions ################

my $empid = $AGI-&gt;get_data(''''employee'''',-1,5); # Asks for Employee ID
$AGI-&gt;stream_file(entered);
$AGI-&gt;say_digits($empid);

my $optemp = $AGI-&gt;get_data(''''correct'''',-1,1); 
Read more

, , ,

No Comments