"Oliver Bode" <[EMAIL PROTECTED]>
wrote:
> =================================
> #!/usr/bin/perl -w
>
> system("openssl smime -encrypt -in message.txt -out crypto.txt cert.pem");
I suggest that this is NOT the way to do this. Its better to open it something like this:
our $Debug=1;
#DONT FORGET THE PIPE AT THE END!
open (SSL,"openssl smime -encrypt -in message.txt -out crypto.txt cert.pem |") || die "Failed to execute OpenSSL\n";
while (<SSL>) {
print if $Debug;
#do OPENSSL response parsing
}
close SSL;
At least then you have the ability to SEE whats going on.
Also, my experience is that OpenSSL is _very_ picky about paths, of itself and of everything else so if you are still having problems look there first.
Yves
