Asterisk::Manager (3pm)

use Asterisk::Manager;

my $astman = new Asterisk::Manager;

$astman->user('username');

$astman->secret('test');

$astman->host('localhost');

$astman->connect || die \*(L"Could not connect to \*(R" . $astman->host . \*(L"!\n\*(R";

$astman->disconnect;

This module provides a simple interface to the asterisk manager interface.