[Perl-beginners] RE: Crypt::GPG won't decrypt file...rewrote it to use system, but only partially works

RICHARD FERNANDEZ wrote:
I re-wrote the decryption routine to use system instead of Crypt::GPG,
and came across another puzzle:

my @gpg_command = ("/usr/bin/gpg --decrypt $encrypted >
$decrypted 2> /dev/null");
system(@gpg_command) == 0 or warn "system @gpg_command failed:
$!";

works. It decrypts my file successfully. But if I break up the arguments
like it says in the doco, like so:

my @gpg_command = ("/usr/bin/gpg", "--decrypt", $encrypted, ">",
$decrypted, "2> /dev/null");
system(@gpg_command) == 0 or warn "system @gpg_command failed:
$!";

it does not work. Instead I get a "usage" error.


Could someone please explain where I've gone wrong? I would like to use
Crypt::GPG instead of system, but I have to get this finished.
Thanks!

richf

I would suggest giving GnuPG::Interface a go because it
handled calling out to 'gpg' most "correctly". Meaning it
uses the status-fd, logger-fd options properly which is the
preferred way to call gpg in an automated fashion.

Good luck,

http://danconia.org

RICHARD FERNANDEZ wrote:
[...]
It decrypts my file successfully. But if I break up the arguments
like it says in the doco, like so:

my @gpg_command = ("/usr/bin/gpg", "--decrypt", $encrypted, ">",
$decrypted, "2> /dev/null");