diff options
Diffstat (limited to 'client')
-rwxr-xr-x | client | 15 |
1 files changed, 1 insertions, 14 deletions
@@ -361,20 +361,7 @@ elsif ($COMMAND eq 'newOrder') { die "Timeout exceeded while waiting for certificate\n" if $timeout > 0 and $i >= $timeout; sleep $retry_after; } - - # keep only the leaf certificate - pipe my $rd, my $wd or die "Can't pipe: $!"; - my $pid = fork // die "Can't fork: $!"; - unless ($pid) { - open STDIN, '<&', $rd or die "Can't dup: $!"; - exec qw/openssl x509 -outform PEM/ or die; - } - $rd->close() or die "Can't close: $!"; - $wd->print( $r->decoded_content() ); - $wd->close() or die "Can't close: $!"; - - waitpid $pid => 0; - die $? if $? > 0; + print $r->decoded_content(); } |