我知道这个问题很愚蠢,但由于发送给它的文本中有数百万个单引号,我们遇到程序崩溃。文本确实再次由perl调用处理并返回。所以我想在调用perl之前用一些字符替换单引号,并在返回perl函数之后取消它。这样做的最佳方法是什么,因为如果我用#或@这样的字符替换然后将它们替换为引用可能会导致问题,如果它们包含在原始文本中,那么可能是最佳模式可以用作替换?
replace("'", "<something>")
某事可以是一个字符串......
答案 0 :(得分:1)
char * bkpstr = strdup( originalString );
for ( char * ptr = originalString; *ptr; ptr++)
{
if ('\'' == *ptr) { *ptr = REPLACEMENT_CHAR; }
}
然后在需要原件时使用bkpstr。