Run Shell command in Perl

Question

I can run some Shell Linux commands in Perl (for example create a folder). But I can't execute followed command:

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

I add this command in .sh file and could execute in Shell fine. but when I call .sh file, Perl couldn't run it. I used open3 , system , open commands to run. I could run other .sh file, but not for this command.

Can you help me please?

Answer 1

Try using backquote/backtick, seems to work fine:

#!/usr/bin/perl
use strict;

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

PS I would better use some cpan module like GPG .