[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