string buffer too small

git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@12460 d0543943-73ff-0310-b7d9-9358b9ac24b2

libs/esl/perl/single_command.pl

@@ -4,5 +4,5 @@ my $command = shift;
 my $args = join(" ", @ARGV);
 
 my $con = new ESL::ESLconnection("localhost", "8021", "ClueCon");
-my $e = $con->api($command, $args);
+my $e = $con->bgapi($command, $args);
 print $e->getBody();

libs/esl/src/esl_oop.cpp

@@ -92,7 +92,7 @@ ESLevent *ESLconnection::bgapi(const char *cmd, const char *arg)
 		return NULL;
 	}
 
-	len = strlen(cmd) + (arg ? strlen(arg) : 0) + 5;
+	len = strlen(cmd) + (arg ? strlen(arg) : 0) + 8;
 
 	cmd_buf = (char *) malloc(len);
 	assert(cmd_buf);