From: Mitch Capper <mitch.capper@gmail.com>
Date: Wed, 22 Mar 2017 19:23:36 +0000 (-0700)
Subject: Resolves FS-10071. Fixed newer (perl 5.22 and up) versions of perl from crashing... 
X-Git-Tag: v1.8.0~697^2
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=862c969ba5924fb04ed32e483c5bef13712d4463;p=thirdparty%2Ffreeswitch.git

Resolves FS-10071. Fixed newer (perl 5.22 and up) versions of perl from crashing, -e means evaluate the following string and it does not like emptystr.
---

diff --git a/src/mod/languages/mod_perl/mod_perl.c b/src/mod/languages/mod_perl/mod_perl.c
index 8df36d37f3..bc15f58dc3 100644
--- a/src/mod/languages/mod_perl/mod_perl.c
+++ b/src/mod/languages/mod_perl/mod_perl.c
@@ -45,7 +45,7 @@
 #include <EXTERN.h>
 #include <perl.h>
 #include <switch.h>
-static char *embedding[] = { "", "-e", "" };
+static char *embedding[] = { "", "-e", "0" };
 EXTERN_C void xs_init(pTHX);
 
 SWITCH_MODULE_LOAD_FUNCTION(mod_perl_load);