在perl程序中嵌入shell命令

Question

如何嵌入像mysql -sN -e＆＃34; query;＆＃34;在perl脚本中，以便我的shell将成为建立数据库连接的shell。查询是一个有点复杂的查询，从命令行运行完美，但是当我在我的perl程序中设置它时，我得到一堆错误，如＆＃34;字符串找到运算符期望＆＃34; ，＆＃34;在操作员期望的地方发现了赤字＃34;和语法错误。知道怎么做而不给perl访问数据库吗？

Answer 1

您可以使用后引号，下面的示例会将OS ls -l命令的输出放入内容中。假设你知道你正在做什么的风险。

#!/usr/bin/perl

use strict;

my $content=`ls -l`;
print $content;