Fix to remove backslash-canceled-out double-quotes in TILTX AGI script

git-svn-id: svn://192.168.202.10@3515 3d104415-ff17-0410-8863-d5cf3c621b8a
This commit is contained in:
mattf
2021-09-08 21:43:51 +00:00
parent faeb4ad0b9
commit 75fda0153b
+5
View File
@@ -19,6 +19,7 @@
# #
# changes: # changes:
# 210605-0936 - first build # 210605-0936 - first build
# 210908-1722 - Fix to remove backslash-canceled-out double-quotes
# #
$script = 'agi-TILTX_SHAKEN.agi'; $script = 'agi-TILTX_SHAKEN.agi';
@@ -392,24 +393,28 @@ foreach(@Wdoc)
{ {
$TILTXID = $Wdoc[$i]; $TILTXID = $Wdoc[$i];
$TILTXID =~ s/.*"TILTXID":"//; $TILTXID =~ s/.*"TILTXID":"//;
$TILTXID =~ s/\\"//g;
$TILTXID =~ s/".*//; $TILTXID =~ s/".*//;
} }
if ($Wdoc[$i] =~ /"Identity":".*"/i) if ($Wdoc[$i] =~ /"Identity":".*"/i)
{ {
$Identity = $Wdoc[$i]; $Identity = $Wdoc[$i];
$Identity =~ s/.*"Identity":"//; $Identity =~ s/.*"Identity":"//;
$Identity =~ s/\\"//g;
$Identity =~ s/".*//; $Identity =~ s/".*//;
} }
if ($Wdoc[$i] =~ /"CAID":".*"/i) if ($Wdoc[$i] =~ /"CAID":".*"/i)
{ {
$CAID = $Wdoc[$i]; $CAID = $Wdoc[$i];
$CAID =~ s/.*"CAID":"//; $CAID =~ s/.*"CAID":"//;
$CAID =~ s/\\"//g;
$CAID =~ s/".*//; $CAID =~ s/".*//;
} }
if ($Wdoc[$i] =~ /"CallerIDToUse":".*"/i) if ($Wdoc[$i] =~ /"CallerIDToUse":".*"/i)
{ {
$CallerIDToUse = $Wdoc[$i]; $CallerIDToUse = $Wdoc[$i];
$CallerIDToUse =~ s/.*"CallerIDToUse":"//; $CallerIDToUse =~ s/.*"CallerIDToUse":"//;
$CallerIDToUse =~ s/\\"//g;
$CallerIDToUse =~ s/".*//; $CallerIDToUse =~ s/".*//;
} }
# log all response data as a single string together # log all response data as a single string together