在Perl中運行Shell命令

Question

我可以在Perl中運行一些Shell Linux命令（例如，創建一個文件夾）。 但是我無法執行以下命令：

echo 'mypassword' | gpg --passphrase-fd 0 --output outfile --decrypt inputfile

我將此命令添加到.sh文件中，並且可以在Shell中執行。 但是當我調用.sh文件時，Perl無法運行它。 我使用open3 ， system ， open命令來運行。 我可以運行其他.sh文件，但不能運行此命令。

你能幫我嗎？

Answer 1

嘗試使用反引號/反引號，似乎可以正常工作：

#!/usr/bin/perl
use strict;

`echo 'mypassword' | gpg --passphrase-fd 0 --output outfile --decrypt inputfile`

PS我最好使用一些cpan模塊，如GPG 。