[vienna.pm] SSL Programmierung

Philipp Gühring p.guehring at poboxes.com
Tue May 15 01:28:41 CDT 2001


-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Hallo!

Ich bräuchte eine HTTPS POST Funktion, die eigene Zertifikate akzeptiert. Ich 
habs mal durch patchen von Net::SSL (SSLeay.pm) probiert, aber der Erfolg 
will sich nicht so recht einstellen:

Argument "server" isn't numeric in subroutine entry at 
/usr/lib/perl5/site_perl/5.6.0/i586-linux/Net/SSLeay.pm line 355.
Argument "/etc/passwd" isn't numeric in subroutine entry at 
/usr/lib/perl5/site_perl/5.6.0/i586-linux/Net/SSLeay.pm line 355.
Use of uninitialized value in numeric eq (==) at blib/lib/Net/SSLeay.pm 
(autosplit into blib/lib/auto/Net/SSLeay/https_cat.al) line 1321.
Use of uninitialized value in numeric eq (==) at blib/lib/Net/SSLeay.pm 
(autosplit into blib/lib/auto/Net/SSLeay/https_cat.al) line 1321.
Use of uninitialized value in subroutine entry at blib/lib/Net/SSLeay.pm 
(autosplit into blib/lib/auto/Net/SSLeay/set_server_cert_and_key.al)
line 1400.
Use of uninitialized value in concatenation (.) at blib/lib/Net/SSLeay.pm 
(autosplit into blib/lib/auto/Net/SSLeay/set_server_cert_and_key.al) line 
1401.
Can't call method "content" without a package or object reference at ssl.pl 
line 115.

Schöne Grüße,
- -- 
~ Philipp Gühring              p.guehring at futureware.at
~ http://www.futureware.at/       ICQ UIN: 6588261
~ "Hat du Abkürzungen, mut du Futureware Translator nehmen!"
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.0.4 (GNU/Linux)
Comment: For info see http://www.gnupg.org

iD8DBQE7AMyZlqQ+F+0wB3oRAlaWAJ9DB4LX8/mJ9Br/eLcqJXFi15CTAwCfbjbi
Zak55NIEJP0fief6khzgo+g=
=xi0m
-----END PGP SIGNATURE-----
-------------- next part --------------
1303c1303
<     my ($dest_serv, $port, $out_message) = @_;
---
>     my ($dest_serv, $port, $out_message, $cert_file, $key_file) = @_;
1324a1325,1326
>     set_server_cert_and_key ($ctx, $cert_file, $key_file) if ($cert_key || $key_file);
> 
1430c1432
<     my ($site, $port, $path, $method, $headers, $content, $mime_type) = @_;
---
>     my ($site, $port, $path, $method, $headers, $content, $mime_type, $cert_file, $key_file) = @_;
1444c1446
<     ($http, $errs) = https_cat($site, $port, $req);    
---
>     ($http, $errs) = https_cat($site, $port, $req, $cert_file, $key_file);    
1458,1459c1460,1461
<     my ($site, $port, $path, $headers, $content, $mime) = @_;
<     return do_https($site, $port, $path, 'GET', $headers, $content, $mime);
---
>     my ($site, $port, $path, $headers, $content, $mime, $cert_file, $key_file) = @_;
>     return do_https($site, $port, $path, 'GET', $headers, $content, $mime, $cert_file, $key_file);
1463,1464c1465,1466
<     my ($site, $port, $path, $headers, $post_str, $mime) = @_;
<     return do_https($site, $port, $path, 'POST', $headers, $post_str, $mime);
---
>     my ($site, $port, $path, $headers, $post_str, $mime, $cert_file, $key_file) = @_;
>     return do_https($site, $port, $path, 'POST', $headers, $post_str, $mime, $cert_file, $key_file);


More information about the Vienna-pm mailing list