如何在perl中进行命令替换？

Question

在shell中基本上会像这样做命令替换

a=`uname -a`  

然后在perl中怎么做？

Answer 1

$a = qx( uname -a )

该qx操作是一样的反引号,但更具可读性.

Answer 2

在Perl中几乎完全相同 -

$a = `uname -a`;

但是,正如@William Purcell所说,qx它是相同的,更具可读性.