github-repos/wget
1
0
Fork 0
mirror of https://github.com/mirror/wget.git synced 2025-04-02 07:30:49 +08:00
Code Issues Packages Projects Releases Wiki Activity

* tests/SSLServer.pm: Check for IO::Socket::SSL

Browse Source
This commit is contained in:
Tim Rühsen 2017-05-08 11:54:53 +02:00
parent a26e6f3527
commit 5337b94ce5
2 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
tests/SSLServer.pm
View File

@ -11,7 +11,16 @@ use HTTP::Daemon;
use HTTP::Status; use HTTP::Status;
use HTTP::Headers; use HTTP::Headers;
use HTTP::Response; use HTTP::Response;
use IO::Socket::SSL; # 'debug4';
# Skip this test rather than fail it when the module isn't installed
if (!eval {require IO::Socket::SSL;1;}) {
print STDERR "This test needs the perl module \"IO::Socket::SSL\".\n";
print STDERR "Install e.g. on Debian with 'apt-get install libio-socket-ssl-perl'\n";
print STDERR " or if using cpanminus 'cpanm IO::Socket::SSL' could be used to install it.\n";
exit 77; # skip
}
#use IO::Socket::SSLX; # 'debug4';
use HTTPServer; use HTTPServer;
our @ISA = qw(IO::Socket::SSL HTTP::Daemon::ClientConn HTTP::Daemon HTTPServer); our @ISA = qw(IO::Socket::SSL HTTP::Daemon::ClientConn HTTP::Daemon HTTPServer);

9
tests/Test-https-pfs.px
View File

@ -2,15 +2,6 @@
use strict; use strict;
use warnings; use warnings;
# Skip this test rather than fail it when the module isn't installed
if (!eval {require IO::Socket::SSL;1;}) {
print STDERR "This test needs the perl module \"IO::Socket::SSL\".\n";
print STDERR "Install e.g. on Debian with 'apt-get install libio-socket-ssl-perl'\n";
print STDERR " or if using cpanminus 'cpanm IO::Socket::SSL' could be used to install it.\n";
exit 77; # skip
}
use SSLTest; use SSLTest;
############################################################################### ###############################################################################