从perl脚本调用perl脚本

Question

我想用bash shell中的大参数列表从perl脚本调用perl脚本。参数包含特殊字符，如\、*、(、)等。这些特殊字符中的每一个都由单个转义字符\引导。

但是，当我从第一个perl脚本调用第二个perl脚本(然后调用一个shell脚本)时，将计算转义字符，并将特殊字符暴露在shell中，从而导致语法错误。

所以基本上，当我从第一个perl脚本调用第二个perl脚本时，我希望防止转义字符的求值，而当我从第二个perl脚本调用shell脚本时，应该对其求值。

例如：第一个perl 'MonitorAdmin‘脚本的输入是：

MonitorAdmin -reversefilter -container="LogServerContainer" -filepath="/home/esg2/YogeshTemp/VSDEFAULT/logs" -filename="System.log" -pattern=".*\t.*\t(DEBUG)\t.*\t.*\t.*\t(SecurityService)\t.*\t.*\t.*\t.*\t.*" -linecount="5001" -targetfile="

Answer 1

system有两种形式，一种是执行外壳命令(system($shell_cmd))，另一种是启动程序(system($program, @args))。据我们所知，你的文章似乎用错了。你所需要的是

system('MonitorAdmin2', @ARGV)

没有什么外壳可以“曲解”这些角色。

Answer 2

如果您向exec和system命令传递一个包含多个元素的列表，则它们不会调用shell，但是每个列表元素都会变成一个单独的参数，即空格不会分隔参数。我可以想象，即使在执行shell脚本时，这也能很好地工作，因为您不会使用-c选项调用应该。