[Freeswitch-svn] [commit] r7130 - freeswitch/trunk/scripts/socket

[Freeswitch SVN]

Author: anthm
Date: Mon Jan  7 13:21:34 2008
New Revision: 7130

Modified:
   freeswitch/trunk/scripts/socket/sock.pl

Log:
update

Modified: freeswitch/trunk/scripts/socket/sock.pl
==============================================================================
--- freeswitch/trunk/scripts/socket/sock.pl	(original)
+++ freeswitch/trunk/scripts/socket/sock.pl	Mon Jan  7 13:21:34 2008
@@ -22,7 +22,7 @@
 $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 @@
     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");
   }