Date: Mon, 16 Jan 2017 07:44:51 +0000 From: bugzilla-noreply@freebsd.org To: freebsd-amd64@FreeBSD.org Subject: [Bug 216133] p5-HTTP-Daemon-SSL Message-ID: <bug-216133-6@https.bugs.freebsd.org/bugzilla/>
index | next in thread | raw e-mail
https://bugs.freebsd.org/bugzilla/show_bug.cgi?id=216133 Bug ID: 216133 Summary: p5-HTTP-Daemon-SSL Product: Ports & Packages Version: Latest Hardware: amd64 OS: Any Status: New Severity: Affects Many People Priority: --- Component: Package Infrastructure Assignee: portmgr@FreeBSD.org Reporter: fm@tpbox.com CC: freebsd-amd64@FreeBSD.org CC: freebsd-amd64@FreeBSD.org The latest pkg updates perl to 5.24, and the p5-HTTP-Daemon-SSL package is now broken. Everything would work with perl 5.20 (previous pkg version). The example script provided in the perl module documentation (see below) crashes with the following error message: > Bad arg length for Socket::inet_ntoa, length is 16, should be 4 at > /usr/local/lib/perl5/site_perl/HTTP/Daemon.pm line 51. Previously, the very same error would happen with Perl5 IPv6 socket modules installed, and a possible workaround was manually uninstalling the following packages: p5-IO-Socket-INET6, p5-Socket, p5-Socket6, p5-IO-Socket-IP. Script example: 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); } -- You are receiving this mail because: You are on the CC list for the bug.help
Want to link to this message? Use this
URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?bug-216133-6>