commit cd8f5d0725ada5f9858b2d89b75e20256154c641
parent 8981fb6b1ecf5fd2570d4ae9d2cabc4c0ff40899
Author: kyle <kyle@0x30.net>
Date: Tue, 12 Jan 2016 23:28:25 -0700
sl: simplify listening socket setup
Diffstat:
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/server/sl b/server/sl
@@ -26,11 +26,10 @@ my $db = database->new();
$db->create_tables();
my $listen_sock = new IO::Socket::INET (
- LocalHost => '0.0.0.0',
LocalPort => $args{p} || '5437',
Proto => 'tcp',
- Listen => 100,
- Reuse => 1,
+ Listen => 1,
+ ReuseAddr => 1,
);
die "Could not create socket: $!\n" unless $listen_sock;