Как мне заставить HTTP :: Daemon :: SSL работать без сертификатов?

Question

Я скачал HTTP :: Daemon :: SSL для Strawberry Perl 5.10 из CPAN и запустил этот пример:

use HTTP::Daemon::SSL;
use HTTP::Status;

# Make sure you have a certs/ directory with "server-cert.pem"
# and "server-key.pem" in it before running this!
my $d = HTTP::Daemon::SSL->new || die;
print "Please contact me at: <URL:", $d->url, ">\n";
while (my $c = $d->accept) {
    while (my $r = $c->get_request) {
        if ($r->method eq 'GET' and $r->url->path eq "/dir") {
            # remember, this is *not* recommened practice :-)
            $c->send_file_response("f.html");
        } else {
            $c->send_error(RC_FORBIDDEN);
        }
    }
    $c->close;
    undef($c);
}

Приложение умерло на этой линии:

my $d = HTTP::Daemon::SSL->new || die;

У меня нет сертификатов. Есть ли возможность настроить этот код для запуска без необходимости сертификатов? Если да, может ли кто-нибудь помочь с этим?

Я тоже пытался заменить

my $d = HTTP::Daemon::SSL->new || die

с

my $d = HTTP::Daemon::SSL->new(SSL_use_cert => 0) || die;

и получил тот же результат.

Answer 1

Вы не можете.Просто создайте несколько фиктивных ключей и сертификатов для тестирования.

http://httpd.apache.org/docs/en/ssl/ssl_faq.html#selfcert