Added failure state if a socket cannot be opened

This commit is contained in:
bluesaxman 2020-09-29 21:26:18 +00:00
parent 2ae20af655
commit 44fbe0874b

View File

@ -296,7 +296,7 @@ my $ssl_conn = IO::Socket::SSL->new(
# ssl.ca-file = "/etc/letsencrypt/live/murkfall.net/chain.pem" # ssl.ca-file = "/etc/letsencrypt/live/murkfall.net/chain.pem"
SSL_cert_file=> "/etc/letsencrypt/live/murkfall.net/fullchain.pem", SSL_cert_file=> "/etc/letsencrypt/live/murkfall.net/fullchain.pem",
SSL_key_file=> "/etc/letsencrypt/live/murkfall.net/privkey.pem" SSL_key_file=> "/etc/letsencrypt/live/murkfall.net/privkey.pem"
); ) or die "Couldn't open the socket, try again: ".$!;
my $server = Net::WebSocket::Server->new( my $server = Net::WebSocket::Server->new(
listen => $ssl_conn, listen => $ssl_conn,