Hi all, I've the following mod_perl program to execute when I call to an extension (say 777). I use twinkle as a soft phone, to make calls.
#!/usr/bin/perl use strict; use freeswitch; our $session; $session->answer(); if($session->ready()) { my $uuid=$session->getVariable("uuid"); freeswitch::consoleLog("INFO","UUID is $uuid\n"); freeswitch::consoleLog("INFO","Session is answered\n"); $session->execute("playback","/usr/local/freeswitch/sounds/en/us/callie/time/8000/day-1.wav"); my $dtmf = $session->getDigits(4,"", 5000); freeswitch::consoleLog("INFO","I received $dtmf\n"); $session->hangup("NORMAL_CLEARING"); sleep(5); # Some other statements. } return 1; Everything is fine. After executing $session->hangup, I got NORMAL_CLEARING in my freeswitch console. But in my soft phone, still the channel is active for 5 seconds. The call got ended only after the 5 seconds sleep. But if I create my own session like my $session=new freeswitch::Session("user/1000"); and I say $session->hangup(), it got terminated. I wanted to know why there is such difference?? or am I wrong?? Please clarify me. -- View this message in context: http://www.nabble.com/Mod_perl-%24session-in-not-hangup-tp25530646p25530646.html Sent from the Freeswitch-users mailing list archive at Nabble.com. _______________________________________________ FreeSWITCH-users mailing list FreeSWITCH-users@lists.freeswitch.org http://lists.freeswitch.org/mailman/listinfo/freeswitch-users UNSUBSCRIBE:http://lists.freeswitch.org/mailman/options/freeswitch-users http://www.freeswitch.org