OK thanks to Zentara, my code now looks like...
#!/usr/bin/perl
use warnings;
use strict;
use IPC::Open3;
local $SIG{CHLD} = 'IGNORE';
local $SIG{PIPE} = 'IGNORE';
my $childpid = open3(\*IN, \*OUT, \*ERR, 'gpg --no-greeting --no-tty
--command-fd 0 --status-fd 1 --edit root');
print IN "tru
zentara wrote:
On Wed, 08 Jun 2005 09:24:43 +0100, [EMAIL PROTECTED] (D. J. Birkett)
wrote:
Thomas Bätzler wrote:
D. J. Birkett <[EMAIL PROTECTED]> asked:
OK I've tried altering my code as you suggested, replacing
the regexes with ones that would work. gpg still just sits
there as soon as
