diff --git a/scripts/perl/FreeSWITCH/Client.pm b/scripts/perl/FreeSWITCH/Client.pm
index 01748a8180..f107aa3d82 100644
--- a/scripts/perl/FreeSWITCH/Client.pm
+++ b/scripts/perl/FreeSWITCH/Client.pm
@@ -145,7 +145,8 @@ sub sendmsg($$$) {
 
   for(;;) {
     $e = $self->readhash(undef);
-    last if $e->{socketerror} or $e->{'content-type'} eq 'command/reply';
+    last if $e->{socketerror} or $e->{'content-type'} eq 'command/reply'
+                              or $e->{'content-type'} eq 'api/response';
     push @{$self->{events}}, $e;
   }