golden hour

/lib64/perl5/vendor_perl/auto/Net/SSLeay

File/Folder	Size	Actions
SSLeay.so	687.23 KB
autosplit.ix	1.54 KB
debug_read.al	678 B
do_https.al	508 B
do_https2.al	446 B
do_https3.al	466 B
do_https4.al	357 B
do_httpx2.al	559 B
do_httpx3.al	1.52 KB
do_httpx4.al	544 B
dump_peer_certificate.al	959 B
get_http.al	316 B
get_http3.al	319 B
get_http4.al	319 B
get_https.al	319 B
get_https3.al	322 B
get_https4.al	322 B
get_httpx.al	316 B
get_httpx3.al	319 B
get_httpx4.al	319 B
head_http.al	319 B
head_http3.al	322 B
head_http4.al	346 B
head_https.al	322 B
head_https3.al	325 B
head_https4.al	333 B
head_httpx.al	319 B
head_httpx3.al	322 B
head_httpx4.al	399 B
http_cat.al	1.17 KB
https_cat.al	2.96 KB
httpx_cat.al	558 B
initialize.al	815 B
make_form.al	604 B
make_headers.al	575 B
new_x_ctx.al	2.38 KB
open_proxy_tcp_connection.al	1.25 KB
open_tcp_connection.al	1.45 KB
post_http.al	318 B
post_http3.al	321 B
post_http4.al	321 B
post_https.al	321 B
post_https3.al	324 B
post_https4.al	324 B
post_httpx.al	318 B
post_httpx3.al	321 B
post_httpx4.al	321 B
put_http.al	316 B
put_http3.al	319 B
put_http4.al	319 B
put_https.al	319 B
put_https3.al	322 B
put_https4.al	322 B
put_httpx.al	316 B
put_httpx3.al	319 B
put_httpx4.al	319 B
randomize.al	1 KB
set_cert_and_key.al	828 B
set_proxy.al	540 B
set_server_cert_and_key.al	413 B
ssl_read_CRLF.al	385 B
ssl_read_all.al	1.02 KB
ssl_read_until.al	3.07 KB
ssl_write_CRLF.al	813 B
ssl_write_all.al	5.6 KB
sslcat.al	3.12 KB
tcp_read_CRLF.al	401 B
tcp_read_all.al	757 B
tcp_read_until.al	971 B
tcp_write_CRLF.al	794 B
tcp_write_all.al	1.2 KB
tcpcat.al	1.33 KB
tcpxcat.al	485 B
want_X509_lookup.al	442 B
want_nothing.al	358 B
want_read.al	310 B
want_write.al	313 B

Edit: ssl_read_all.al

# NOTE: Derived from blib/lib/Net/SSLeay.pm.
# Changes made here will be lost when autosplit is run again.
# See AutoSplit.pm.
package Net::SSLeay;

#line 1159 "blib/lib/Net/SSLeay.pm (autosplit into blib/lib/auto/Net/SSLeay/ssl_read_all.al)"
sub ssl_read_all {
    my ($ssl,$how_much) = @_;
    $how_much = 2000000000 unless $how_much;
    my ($got, $rv, $errs);
    my $reply = '';

while ($how_much > 0) {
        ($got, $rv) = Net::SSLeay::read($ssl,
                ($how_much > 32768) ? 32768 : $how_much
        );
	if (! defined $got) {
	    my $err = Net::SSLeay::get_error($ssl, $rv);
	    if ($err != Net::SSLeay::ERROR_WANT_READ() and
		$err != Net::SSLeay::ERROR_WANT_WRITE()) {
                $errs = print_errs('SSL_read');
                last;
            }
            next;
        }
        $how_much -= blength($got);
        debug_read(\$reply, \$got) if $trace>1;
        last if $got eq '';  # EOF
        $reply .= $got;
    }

return wantarray ? ($reply, $errs) : $reply;
}

# end of Net::SSLeay::ssl_read_all
1;