在另一个Perl中运行Perl

Question

我有一个现有的perl脚本，我在UNIX中运行这样。

echo $query | runQuery.pl -a -f,

它运行一个查询并返回带有-f分隔符的行，在上面的例子中它们是＆＃34;，＆＃34;。

我想在另一个perl脚本中运行相同的命令，我已经定义了$ query并将结果存储在一个数组中（@results）。

我无法使system（）正常工作。请协助。

谢谢和问候，
-Tushar

Answer 1

这样的事应该适合你：

my $arguments = '-a -f,';
my @results = `echo $query | runQuery.pl $arguments`;