在搜索中使用变量n替换为perl

Question

我在尝试使用perl中的搜索n替换选项时遇到了问题。

这不是UNIX中的问题，而是只出现在窗口中。我正在使用变量来搜索文件并将其替换为所需的字符串。 另外我在perl脚本中使用它，所以它只是增加了问题！

$oldstring = 1234; 
$newstring = 6789; 

system("perl -pi.back e s/$oldstring/$newstring/g $filename"); 

我从数组中检索目录中的文件名并将它们作为输入传递给单线程。输出文件似乎没有变化，但它也不报告任何警告或故障。

我尝试以下也

system("perl -pi.back e 's/$oldstring/$newstring/g' $filename"); 

为什么为n顶替并不如预期的工作搜索？

Answer 1

你需要合适的报价为system()和命令行，

system(qq(perl -pi.back -e "s/$oldstring/$newstring/g" $filename)); 

，或者使用更简单，更高效的系统，而无需调用外壳，

system("perl", "-pi.back", "-e", "s/$oldstring/$newstring/g", $filename);