Hey I'm sorry. I've solved this as follows
my $sess=new freeswitch::Session("user/1000");
$sess->answer();
#$sess->waitForAnswer($session);
if($sess->ready())
{
freeswitch::consoleLog("INFO","Session is answered\n");
$sess->execute("playback","/usr/local/freeswitch/sounds/en/us/callie/time/8000/day-1.wav");
my $dtmf = $sess->getDigits(4,"", 5000);
freeswitch::consoleLog("INFO","I received $dtmf\n");
$sess->execute("bridge","user/$dtmf");
}
lakshmanan wrote:
>
> I also tried the following.
> #!/usr/bin/perl
> use strict;
> use freeswitch;
> our $session;
> my $sess=new freeswitch::Session("user/1000");
> $sess->answer();
> if($sess->ready())
> {
> freeswitch::consoleLog("INFO","Session is answered\n");
>
> $sess->execute("playback","/usr/local/freeswitch/sounds/en/us/callie/time/8000/day-1.wav");
> my $dtmf = $sess->getDigits(4,"", 5000);
> freeswitch::consoleLog("INFO","I received $dtmf\n");
> my $new_sess=new freeswitch::Session("user/$dtmf");
> $new_sess->answer();
> if($new_sess->ready())
> {
> $session->bridge($sess,$new_sess);
> }
> }
>
> In the above program I got usage error on $session->bridge.
>
>
>
> mercutioviz wrote:
>>
>>
>>
>> Sent from my iPhone
>>
>> On Aug 27, 2009, at 10:01 PM, lakshmanan ganapathy
>> <[email protected]> wrote:
>>
>>> No. In the dial plan I said, application="perl" data="The perl
>>> script".
>>> I also checked $session->execute("bridge","user/1010"). This is
>>> working fine.
>>> But originate is not working as I expected.
>>>
>> I think you might be confusing Dialplan apps with API commands. The
>> $session object represents an existing channel and therefore it uses
>> Dialplan apps. Originate is an API, that is, it is a command that you
>> type at the CLI.
>>
>> You need an API object to use originate from a script:
>> my $api = new $freeswitch::API();
>> my $res = $api->executeString("originate user/1010 &bridge(user/1000);
>>
>> What kind of application are you developing? I'm curious why you need
>> an originate to create a whole new call.
>>
>> -MC
>>
>>> On Thu, Aug 27, 2009 at 9:46 PM, Michael Collins
>>> <[email protected]> wrote:
>>>
>>>
>>> On Wed, Aug 26, 2009 at 9:38 PM, lakshmanan <[email protected]>
>>> wrote:
>>>
>>> When I give the following from the command line it calls to 1010
>>> extension
>>> and once answered, it calls to 1000 and bridge the connection.
>>> originate user/1010 &bridge(user/1000)
>>> But I want to do this in perl. So I have given as follows
>>> $session->originate($session,"user/1010 &bridge user/
>>> 1000");
>>> But it is not working. It says "user/1010 &bridge user/1000 is invalid
>>> user".
>>> How to do this in perl. pls help.
>>>
>>> Are you calling this perl script from the CLI? If so you won't have
>>> the $session object because a channel does not exist for a simple
>>> API call.
>>> -MC
>>>
>>>
>>> _______________________________________________
>>> FreeSWITCH-users mailing list
>>> [email protected]
>>> http://lists.freeswitch.org/mailman/listinfo/freeswitch-users
>>> UNSUBSCRIBE:http://lists.freeswitch.org/mailman/options/freeswitch-users
>>> http://www.freeswitch.org
>>>
>>>
>>> _______________________________________________
>>> FreeSWITCH-users mailing list
>>> [email protected]
>>> http://lists.freeswitch.org/mailman/listinfo/freeswitch-users
>>> UNSUBSCRIBE:http://lists.freeswitch.org/mailman/options/freeswitch-users
>>> http://www.freeswitch.org
>>
>>
>> _______________________________________________
>> FreeSWITCH-users mailing list
>> [email protected]
>> http://lists.freeswitch.org/mailman/listinfo/freeswitch-users
>> UNSUBSCRIBE:http://lists.freeswitch.org/mailman/options/freeswitch-users
>> http://www.freeswitch.org
>>
>>
>
>
--
View this message in context:
http://www.nabble.com/How-to-make-a-call-back-tp25166083p25185052.html
Sent from the Freeswitch-users mailing list archive at Nabble.com.
_______________________________________________
FreeSWITCH-users mailing list
[email protected]
http://lists.freeswitch.org/mailman/listinfo/freeswitch-users
UNSUBSCRIBE:http://lists.freeswitch.org/mailman/options/freeswitch-users
http://www.freeswitch.org