From 287c53798ee9c3d8efdc59f15c1ebf316b9533c8 Mon Sep 17 00:00:00 2001 From: Anthony Minessale Date: Mon, 7 Jan 2008 18:21:34 +0000 Subject: [PATCH] update git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@7130 d0543943-73ff-0310-b7d9-9358b9ac24b2 --- scripts/socket/sock.pl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/scripts/socket/sock.pl b/scripts/socket/sock.pl index cf601363c3..4c3fe9d19a 100755 --- a/scripts/socket/sock.pl +++ b/scripts/socket/sock.pl @@ -22,7 +22,7 @@ print "Call: $data->{'caller-channel-name'} $data->{'unique-id'}\n"; $o = $fs->call_command("answer"); #to turn on events when in async mode $o = $fs->raw_command("myevents"); -$o = $fs->call_command("echo"); +$o = $fs->call_command("playback", "/ram/swimp.raw"); #comment exit in async mode @@ -37,8 +37,7 @@ while(my $r = $fs->readhash(undef)) { print Dumper $r->{event}; } if ($r->{event}->{'event-name'} !~ /execute/i) { - printf "wtf $data->{'unique-id'}\n"; - print "."; + printf "uuid: $data->{'unique-id'}\n"; $o = $fs->call_command("break"); $o = $fs->call_command("hangup"); }