Re: Crypt::SSLeay

• Messages sorted by: [ date ][ thread ][ subject ][ author ]
• Next message: Warren Dodge: "problem with uri/heuristic.......FAILED"
• Previous message: Randal Schwartz: "Re: lwpcook.pod example problems"

I use Net::SSLeay.  The only problem so far is that it dumps core
against iis 3.0 on one machine (of course, neither of the browsers work
with SSL against that server either, and work fine with our other secure
servers).  It works fine with all of our other SSL servers.  My approach
was to build SSLeay 0.0.9, build Net::SSLeay, then use the convenience
function Net::SSLeay::get_https as follows (approximately):

use MIME::Base64;
use Net::SSLeay qw(get_https);

sub download($$$$) {
        my ($user_id, $password, $url, $dest_directory) = @_;

        my $auth_basic_cookie = encode_base64("$user_id:$password");
        # only send this if the user_id is defined
        my $auth_header = "Authorization: Basic $auth_basic_cookie"
                if defined $user_id;

        debug("using auth header:  $auth_header\n");

	# FIXME:  should use LWP functionality here, doh
        my ($protocol, $host, $port, $path) = parse_url($url);

        my ($page, $response, %response_headers) = get_https(
                $host,
                $port,
                $path,
                $auth_header
        );

	# irrelevant page processing here...
}

Note:  Ed, it looks like your clock is set forward by a week or so by
the date on your original post.

• Next message: Warren Dodge: "problem with uri/heuristic.......FAILED"
• Previous message: Randal Schwartz: "Re: lwpcook.pod example problems"