In using Net::SSLeay for the first time, I believe I have found a
documentation bug or two.
1.
My perl compiler complained about this:
use Net::SSLeay, qw(get_https post_https sslcat make_headers make_form);
I removed the comma and now it is fine:
use Net::SSLeay qw(get_https post_https sslcat make_headers make_form);
2.
More importantly, using the example code from the section, Using Client
Certificates, I get this apache error:
Too many arguments for Net::SSLeay::post_https at myscript.cgi line 446,
near "$path_to_key8)"
Execution of relay_response.cgi aborted due to compilation errors.
[Wed May 26 16:41:57 2004] [error] [client 11.111.111.111] Premature end of
script headers: myscript.cgi
I searched the email archive of this list, but a search for "Too many
arguments" gets reduced to just "arguments". And a search for "path_to_key8"
was useless.
This is the sample code:
($page, $response, %reply_headers)
= post_https('www.bacus.pt', 443, '/foo.cgi', # 3b
make_headers('Authorization' =>
'Basic ' .
MIME::Base64::encode("$user:$pass",'')),
make_form(OK => '1', name => 'Sampo'),
$mime_type6, $path_to_crt7, $path_to_key8);
This is what mine looks like:
my $mime_type6 = 'text/xml';
my $path_to_crt7 = '/my/path/mycert.der';
my $path_to_key8 = '/my/path/mykey1024.pem';
use Net::SSLeay qw(post_https);
my ($page, $response, %reply_headers) = post_https('partners.somewhere.com',
443, '/s/MyXml?pid=12345&pacct=My_Acct', '', $xml_text, $mime_type6,
$path_to_crt7, $path_to_key8);
Documentation bug? Or something else?
Thank you,
Ron Pero
______________________________________________________________________
OpenSSL Project http://www.openssl.org
User Support Mailing List [EMAIL PROTECTED]
Automated List Manager [EMAIL PROTECTED]
